填空题
程序执行结果s的值是
【14】
。
Private Sub Command1_click()
i=0
Do
s=i+s
i=i+1
Loop Until i>=4
End Sub
【参考答案】
6
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,显示结果。请填空。 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
点击查看答案&解析
填空题
用户定义的数据类型可以用 【12】 关键字间说明。
点击查看答案&解析
相关试题
在窗体上画一个命令按钮,然后编写如下事件...