题目
下列程序的输出结果是()。
Private Sub Command1_Click()
Dim arr(1 To 10)
For i=1 To 10
Next i
For Each i In arr()
Next i
End Sub
第1题
在窗体中使用一个文本框(名为 num1 )接受输入值,有一个命令按钮 run13 ,事件代码如下:
Private Sub run13_Click()
If Me!num1 >= 60 Then
result = " 及格 "
ElseIf Me!num1 >= 70 Then
result = " 通过 "
ElseIf Me!num1 >= 80 Then
result = " 合格 "
End If
MsgBox result
End Sub
打开窗体后,若通过文本框输入的值为 85 ,单击命令按钮,输出结果是 【 13 】
第5题
窗体上有一个名为Command 1的命令按钮和一个名为Timer 1的计时器,并有下面的
事件过程:
Private Sub Command 1_Click()
Timerl.Enabled=True
End Sub
Private Sub Form_ Load()
Timerl.Interval=10
Timerl.Enabled=False
End Sub
Private Sub Timerl_Timer()
Command l .Left=Commandl .Left+10
End Sub
程序运行时,单击命令按钮,则产生的结果是
A)命令按钮每10秒向左移动一次
B)命令按钮每10秒向右移动一次
C)命令按钮每10毫秒向左移动一次
D)命令按钮每10毫秒向右移动一次
为了保护您的账号安全,请在“赏学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!