填空题

设有如下代码:
x=1
do
x=x+2
loop until ______
运行程序,要求循环体执行3次后结束循环,在空白处填入适当语句。

【参考答案】

x=7或x>=7或x>6
<上一题 目录 下一题>
热门 试题

填空题
在窗体中添加一个命令按钮,名称为Command1,然后编写如下程序: Private Sub Command1_Click() Dim s,i For i=1 To 10 s=s+i Next i MsgBox s End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
填空题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub s(By Val p As Integer) p=p*2 End Sub Private Sub Command1_Click() Dim i As Inteaer i=3 Call s(i) If i>4 Then i=i^2 MsgBox i End Sub 窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
相关试题
  • False或0
  • MsgBox( , vbOKCancel)或MsgBox( ,...