题目内容
（请给出正确答案）
在窗体上画四个文本框，并用这四个文本框建立一个控件数组，名称为Text1(下标从0开始，依次增大)，然后编写如下事件过程： Private Sub Command1_Click() For Each TextBox In TeXt1 Text1(i)=Text1(i).Index i=i+1 Next End Sub 程序运行后，单击命令按钮，四个文本框中显示的内容分别为 ______。
A．0 1 2 3
B．1 2 3 4
C．0 1 3 2
D．出错信息
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“在窗体上画四个文本框，并用这四个文本框建立一个控件数组，名称为Text1（下标从0开始，依次增大)，然”相关的问题
Funtion panduan(x As Integer,y As Integer) As Integer
panduan=IIF(x＞y,x,y)
End Function
Private Sub cmd_click()
Dim a As Integer,b As Integer
a=4
b=7
MsgBox panduan(a, b)
End Sub
打开窗体单击命令按钮，消息框中输出的结果为【 】。
A. 散热器通常安装在窗的下部，以便使散热器表面上升的热空气与冷风混合而降低温度后再循环至室内中部，以此来抵御冷风侵入和增加对人的舒适性
B. 立管一般布置在窗间靠近墙处或墙壁的角落
C. 位于顶层顶棚和地沟内的干管有保温措施，以减少热损失和防止冻结
D. 根据供暖系统的形式布置干管，一般合理地分成若干支路，以便阻力损失平衡
E. 供暖管道系统的引入口一般设置在建筑物热负荷对称的位置，大多是建筑物的上部，以系统作为半径
Dim x As Integer，i As Integer
x＝0
For i=20 To 1 Step-2 x＝x+i\5
Next i
后,x的值为
A．16
B．17
C．18
D．19
A．数组中每个命令按钮的名称(Name属性)均为Command1
B．数组中每个命令按钮的标题(Caption属性)都一样
C．数组中所有命令按钮可以使用同一个事件过程
D．用名称Command1(下标)可以访问数组中的每个命令按钮
A．21
B．13
C．8
D．25
A．12
B．11
C．10
D．9
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Dim SW As Boolean Function func(X As Integer)As Integer IfX＜20 Then Y=X Else Y=20+X End lf func=Y End Function Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) SW=False End Sub Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As SinSle，Y As Single) SW=True End Sub Prinvate Sub Command1_Click() Dim intNum As Integer intNum=InputBox(””) If SW Then Print func(intNum) End If End Sub 程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果为
A．输出0
B．输出25
C．输出45
D．无任何输出
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
