[填空題] 以下程序的功能是：從鍵盤上輸入若干個數(shù)字，當輸入負數(shù)時結束輸入，統(tǒng)計出若干數(shù)字的平均值，輸出結果。請?zhí)羁铡?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[評析] 根據(jù)表達式的值有條件地執(zhí)行一組語句。 語法 If condition Then[statements][Else elsestatements] 或者，可以使用塊形式的語法： If condition Then [statements] [ElseIf condition-n Then [elseifsmtements]... [Else [elsestatements]] End If 當條件為True時，或直到條件變?yōu)門rue時，重復執(zhí)行一個語句塊中的命令。 語法 Do[{While | Until}condition] [statements] [Exit Do] [statements] Loop 或者可以使用下面這種語法： Do [statements] [Exit Do] [statements] Loop[{While | Until}condition] 本題的循環(huán)首先判斷輸入是否大于0，如果是則處理這個輸入，否則結束循環(huán)。循環(huán)體內(nèi)的第二個判斷語句判斷的是當前輸入是否比當前的最小值小，如果是則改寫當前最小值為輸入值，否則結束判斷語句。