单选题
在窗体上画四个文本框，并用这四个文本框建立一个控件数组，名称为Text1（下标从0开始，自左至右顺序增大），然后编写如下事件过程：
在窗体上画四个文本框，并用这四个文本框建立一个控件数组，名称为Text1（下标从0开始，自左至右顺序增大），然后编写如下事件过程：
Private Sub Command1_Click()
For Each TextBox In Text1
Text1(i) = Text1(i).Index
i = i + 1
Next
End Sub
程序运行后，单击命令按钮，四个文本框中显示的内容分别为
发布于 2022-05-11 10:19:59
登录后免费查看答案
关注者
0
被浏览
16
1 个回答
推荐阅读
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程Private Sub Command1_Click()Text1.Text = "Visual"Me.Text1 = "Basic"Text1 = "Program"End Sub程序运行后，如果单击命令按钮，则在文本框中显示的是
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim i As Integer,n As IntegerFor I=0 To 50i=i+3n=n+1If i>10 Then xit forNextText1.Text=Str(n)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
2022-05-11 关注 0 浏览15 1答案
-
窗体中有一个名为Command1的命令按钮和一个名为Text1的文本框，事件代码如下：Private Sub Command1_Click()Dim a(10)As Integer，b(10)As Integern=3For i=1 T0 5a(i)=ib(n)=2*n+iNext iMe!Text1=a(n)+b(n)End Sub打开窗体，单击命令按钮，文本框Text1中显示的内容是（ ）。
2022-05-13 关注 0 浏览12 1答案
-
在窗体中有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：Private Sub Command1_Click(．For I =1 To 4x = 3For j = 1 To 3For k = 1 To 2x = x + 3Next kNext jNext IText1.value = Str(x．End Sub打开窗体运行后，单击命令按钮，文本框Text1输出的结果是
2022-05-13 关注 0 浏览16 1答案
-
设有如下通用过程：Public Sub Fun(a() As Integer, x As Integer)For i = 1 To 5x = x + a(i)NextEnd Sub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程：Private Sub Command1_Click()Dim arr(5) As Integer, n As IntegerFor i = 1 To 5arr(i) = i + iNextFun arr, nText1.Text = Str(n)End Sub程序运行后，单击命令按钮，则在文本框中显示的内容是（ ）。
2022-05-11 关注 0 浏览8 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
2022-05-11 关注 0 浏览11 1答案
-
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：Private Sub Command1_Click()Dim array1(10, 10) As IntegerDim i As Integer, j As IntegerFor i = 1 To 3For j = 2 To 4array1(i, j) = i + jNext jNext iText1.Text = array1(2, 3) + array1(3, 4)End Sub程序运行后，单击命令按钮，在文本框中显示的值是
2022-05-11 关注 0 浏览14 1答案
-
在窗体上有一个命令按钮Command1和一个文本框Text1，编写事件代码如下：Private Sub Command1_Click(．Dim i, j, xFor i = 1 To 20 Step 2x = 0For j = i To 20 Step 3x = x + 1Next jNext iText1.Value = Str(x．End Sub打开窗体运行后，单击命令按钮，文本框中显示的结果是
2022-05-13 关注 0 浏览16 1答案
-
在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下程序：Private Sub Form_Load()ShowText1.Text = ""Text2.Text = ""Text1.SetFocusEnd SubPrivate Sub Text1_Change()Text2.Text = Mid(Text1.Text, 8)End Sub程序运行后，如果在文本框Text1中输入BeijingChina，则在文本框Text2中显示的内容是
2022-05-11 关注 0 浏览17 1答案
-
在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写如下事件过程：Private Sub Command1_Click()n = Val(Text1.Text)For i = 2 To nFor j = 2 To sqr(i)If i Mod j = 0 Then Exit ForNext jIf j > Sqr(i) Then Print iNext iEnd Sub该事件过程的功能是
2022-05-11 关注 0 浏览15 1答案
