填空题
某个窗体已编写以下事件过程,打开窗体运行后,单击窗体,消息框的输出结果为______。
Private Sub Form_Click()
Dim k As Integer,n As Integer,m As Integer
n=10:m=1:k=1
Do While k<=n
m=m*2
k=k+1
Loop
MsgBox m
End Sub
【参考答案】
1024
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
执行下面的程序段后,s的值为______。 s=5 For i=26 To 49 Step 0.6 s=s+1 Next i
点击查看答案&解析
填空题
在窗体中有一个名为Command2的命令按钮,该命令的功能是:接收从键盘输入的10个大于0的整数,找出其中的最大值和对应的输入位置。请依据上述功能要求将事件代码补充完整。 Private Sub Command2_Click() max=0 max_n=0 For i=1 To 10 num=Val(InputBox( 请输入第 &i& 个大干0的整数: )) If num>max Then max=______ max_n=i End If Next i MsgBox( 最大值为第 &max_n& 个输入的 &max) End Sub
点击查看答案&解析
相关试题
rs.MoveNext
rs.EOF