一起答
主观

以下程序的功能是从键盘上输入若干个数字,当输入负数时结束输入,统计出若干数字的平均值,显示结果。请填空。

Private Sub Form_Click()

Dim x,y As Single

Dim z As Integer

x=InputBox("Enter a score")

Do while【 】

y=y+x

z=z+1

x=InputBox("Enter a score")

Loop

If z=0 Then

z=1

End If

y=y/z

MsgoBox y

End Sub

试题出自试卷《国家二级(ACCESS)笔试模拟试卷165》
参考答案
查看试卷详情