填空题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim i As Integer,X As Integer
For i=l To 6
If i=1 Then x=i
lf i<=4 Then
x=x+1
Else
x=x+2
End If
Next i
MsgBox X
End Sub
程序运行后,单击命令按钮,其输出结果为______。
【参考答案】
I
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim a(10)As Integer Dim x As Integer For i=1 To 10 a(i)=i Next i x=1 MsgBoxa(f(x)+x) End Sub Function f(y As Integer) y=y+2 f=y End Function 程序运行后,单击命令按钮,消息框的输出结果为______。
点击查看答案&解析
填空题
下面程序的功能是单击窗体时在消息框中输出1000以内能同时被3、5和7整除的整数。请在空白处填入适当语句将程序补充完整。 Private Sub Form_Click() sum=0 For i=1 To 1000 If______Then sum=sum+i End If Next i MsgBox sum End Sub
点击查看答案&解析
相关试题
VBA中使用的3种选择函数,分别是IIf、Swit...