[填空题] 以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。
Private Sub Form_click()
Dim x,y As Single
Dim z As Integer
x=InputBox("Enter a score")
Do while 【8】
y=y+x
z=z+1
x=InputBox("Enter a score")
Loop
If z=0 Then
z=1
End If
y= 【9】
Print y
End Sub
参考答案:
[8]x>=0[9]y/z问题解析:
[评析] 根据表达式的值有条件地执行一组语句。 语法 If condition Then[statements][Else elsestatements] 或者;可以使用块形式的语法; If condition Then [statements] [ElseIf condition-n Then [elseIfstatements]… [Else [elsestatements]] End If 当条件为True时,或直到条件变为True时,重复执行一个语句块中的命令。 语法 Do[{While|Until}condition] [statemems] [Exit Do] [statements] Loop 或者可以使用下面这种语法: Do [statements] [Exit Do] [statements] Loop[{While[Until

![[填空题] 以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。 Private Sub Form_click()Dim x,y As Sing [填空题] 以下程序的功能是:从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,输出结果。请填空。 Private Sub Form_click()Dim x,y As Sing](http://www.mshxw.com/aiimages/31/256530.png)
