[單項(xiàng)選擇題] 在窗體上放置一個(gè)命令按鈕Command1,并編寫下列單擊事件的程序: Option Base 1Private Sub Commandl_Cli
[單項(xiàng)選擇題] 在窗體上放置一個(gè)命令按鈕Command1,并編寫下列單擊事件的程序: Option Base 1Private Sub Commandl_Click0Dim C As Integer, d As Integer d=0 c=6 X = Array(2, 4, 6, 8, 10, 12) For i= 1 To 6 If X(i) > c Thend = d + X(i)c = X(i) Elsed=d-c End If Next i Print dEnd Sub程序運(yùn)行后,單擊命令按鈕,則在窗體上輸出的內(nèi)容為()。
A.10
B.12
C.16
D.20
正確答案:B
參考解析:程序首先使用Array函數(shù)為x數(shù)組變量賦值,然后利用For循環(huán)和If結(jié)構(gòu)語(yǔ)句實(shí)現(xiàn)程序功能。程序執(zhí)行過(guò)程如下: ①當(dāng)i=1時(shí),X(i)=2; d=d-c=6;②當(dāng)i=2時(shí),X(i)=4;d=d- c=-12;③當(dāng)i=3時(shí),X(i)=6;d=d-c=-18;④當(dāng)i=4時(shí),X(i)=8;d= d+X(i)=-10;c=8;⑤當(dāng)i=5時(shí),X(i)=10;d=d+X(i)=0;c=10:⑥當(dāng)i=6時(shí),X(i)=12;d=d+X(i)=12;c=12。
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。