有下列事件過程:Private Sub Command1_Click()b=10Do Until b=－1a=InputBox("請輸入a的值")a=Val
有下列事件過程：
Private Sub Command1_Click()
b=10
Do Until b=-1
a=InputBox("請輸入a的值")
a=Val(A)
b=InputBox("請輸入b的值")
b=Val(B)a=a*b
Loop
Print a
End Sub
程序運(yùn)行后，依次輸入數(shù)值30,20,10,-1后，輸出結(jié)果是( )。
A．6000
B．-10
C．200
D．-6000
正確答案：B解析：本段程序的執(zhí)行過程如下：第1次輸入30，并給變量a賦值為30；第2次輸入20，并給變量b賦值為20，這是執(zhí)行語句a=a*b=600，接著判斷b=20條件不成立，因此繼續(xù)循環(huán)：第3次輸入10，給a賦值為10；第4次輸入-1并賦值給變量b，再執(zhí)行語句a=a*b=-10；然后判斷循環(huán)條件，b=-1條件為真，所以退出循環(huán)。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。