[單項選擇題] 下面程序段,運行后的結(jié)果是 Private Sub Command1_Click() Dim b%(1 To 4) ,i%, t# F
2021-07-20
[單項選擇題] 下面程序段,運行后的結(jié)果是
Private Sub Command1_Click()
Dim b%(1 To 4) ,i%, t#
For i = 1 To 4
b(i) =i
Next
t =Tof(b() )
Print "t ="; t,
End Sub
Function Tof(a() As Integer)
Dim t#, i%
t=1
For i =2 To UBound(
A.
正確答案:
B
參考解析:程序調(diào)用循環(huán)語句對數(shù)組b()賦值,b(i)=i,且數(shù)組b的上下界分別為1和4;接著將數(shù)組b()作為對象,調(diào)用Tof過程,在Tof過程中,定義了兩個變量,和i,i作為For循環(huán)的循環(huán)變量,初始值為2,終值為數(shù)組b的上界;循環(huán)體為“t=t*a(i)”,即將b(i)的值乘以t,然后在賦給t,當循環(huán)結(jié)束后,程序返回的就是數(shù)組b中除第一個元素以外所有元素值的乘積,本題為2×3×4=24,輸出結(jié)果為t=24。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。