主观

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

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

参考答案
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服