填空题

程序执行结果s的值是 【14】 。
Private Sub Command1_Click()
i=0
Do
s=i+s
i=i+1
Loop Until i＞=4
End Sub

【参考答案】

F
<上一题 目录 下一题>
热门 试题

填空题
以下程序的功能是：从键盘上输入若干个数字，当输入负数时结束输入，统计出若干数字的平均值，显示结果。请填空。 Private Sub Form_click() Dim x，y As Single Dim z As Integer x=InputBox( Enter a score ) Do while 【13】 y=y+x z=z+1 x=InputBox( Enter a score ) Loop If z=0 Then z=1 End If y=y z msgbox y End Sub
填空题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() a=0 For i=1 to 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a+1 End If a=a+1 Next j Next i MsgBox a End Sub程序执行后，单击命令按钮，消息框显示的是 【15】 。
相关试题