vb再窗体上添加5个文本框组控件数组,以及一个命令按钮,向文本框输入数据后,单击命令按钮可逆序显示
1个回答
展开全部
有很多种方法可以实现题目的变化
第一种适用于文本框较少的情况
Private Sub Command1_Click()
Dim s As String
s = Text1(0).Text
Text1(0).Text = Text1(4).Text
Text1(4).Text = s
s = Text1(1).Text
Text1(1).Text = Text1(3).Text
Text1(3).Text = s
End Sub
效果图
第二种适用于文本框较多的情况
Private Sub Command1_Click()
Dim s(0 To 14) As String
For i = 0 To 14
s(i) = Text1(i).Text
Next i
For i = 0 To 14
Text1(i).Text = s(14 - i)
Next i
End Sub
效果图
注意两个方法都需要自己添加控件数组,index的值从左到右从上到下递增
希望可以帮到你
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询