单项选择题
在窗体上画4个文本框,并用这4个文本框建立一个控件数组,名称为Text1(下标从0开始,自左至右顺序增大),然后编写下列事件过程:
Private Sub Command1_Click()
For Each TextBox In Text1
Text1(i)=Text1(i).Index
i=i+1
Next
End Sub
程序运行后,单击命令按钮,4个文本框中显示的内容分别为( )。
A.0 1 2 3
B.1 2 3 4
C.0 1 3 2
D.出错信息
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体上有文本框Text1和命令按钮Command1,并有下列事件过程: Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1 If i>10 Then Exit For Next Text1.Text=Str(n) End Sub 单击命令按钮,程序运行后,在文本框中显示的值是( )。
A.2
B.3
C.4
D.5
点击查看答案&解析
单项选择题
下列程序的运行结果是( )。 Private Function myfun(m,n) Do While m>n Do While m>n:m=m-n:Loop Do While n>m:n=n-m:Loop Loop my fun=m End Function Private Sub Command1_Click() Print myfun(9,8) End Sub
A.2
B.1
C.4
D.3
点击查看答案&解析
相关试题
在程序的空白行处填写适当的语句,完成下列...
下列是一个体操评分程序。设满分为10分,...
假设有下列程序段: For i=1 To 3 ...
滚动条的最小值属性是______,最大值...
下列程序段的功能是:从文本框中输入一个数...