单项选择题
在窗体上画4个文本框,并用这4个文本框建立一个控件数组,名称为Text1 (下标从0开始,自左至右顺序增大),然后编者按写如下事件过程:
Private Sub Command1_Cliek()
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.出错信息
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
下列程序执行后,变量x的值为( )。 Dim a, b, c, d As Single Dim x As Single a=10 b=30 c=400 If b>a Then d=a:a=b:b=d End If If b>c Then x=b Else If a>c Then x=c Else x=a End If
A.10
B.30
C.400
D.430
点击查看答案&解析
单项选择题
在窗体上有一个文本框Text1,Text属性值为空,然后编写如下事件过程:Private Sub Text1_KeyPress(Key Ascii As Integer)Dim str As String, n As Integer str=UCase(Chr(Key Ascii)) n=Len(str) Text1.Text=String(n,str) End Sub 程序运行后,若在文本框中输入单字母“p”,则在文本框Text1中显示的内容为( )。
A.pp
B.pP
C.PP
D.Pp
点击查看答案&解析
相关试题
窗体上有两个文本框Text1、Text2以及一个...
下列程序的功能是:调用字体对话框来设置文...