[填空題] 以下程序的功能是：從鍵盤上輸入若干個數(shù)字，當(dāng)輸入負(fù)數(shù)時結(jié)束輸入，統(tǒng)計出若干數(shù)字的平均值，輸出結(jié)果。請?zhí)羁铡?Private Sub Form_click() Dim x，y As Single Dim z As Integer x=InputBox("Enter a score") Do while 【8】 y=y+xz=z+1x=InputBox("Enter a score") Loop If z=0 Thenz=1 End If y= 【9】 Print y End Sub

【8】x＞=0

【9】y/z[評析] 根據(jù)表達(dá)式的值有條件地執(zhí)行一組語句。語法If condition Then [statements] [Else else statements]或者，可以使用塊形式的語法；If condition Then[statements][EIseIfcondition-n Then[elseifstatements]…[Else[elsestatements]]End If當(dāng)條件為True時，或直到條件變?yōu)門rue時，重復(fù)執(zhí)行一個語句塊中的命令。語法Do[{While | Until }condition][statements][Exit Do][statements]Loop或者可以使用下面這種語法：Do[statements][Exit Do][statements]Loop[{While | Until}condition]本題的循環(huán)首先判斷輸入是否大于0，如果是則處理這個輸入，否則結(jié)束循環(huán)。循環(huán)體內(nèi)的第二個判斷語句判斷的是當(dāng)前輸入是否比當(dāng)前的最小值小，如果是則改寫當(dāng)前最小值為輸入值，否則結(jié)束判斷語句。