[單項(xiàng)選擇題] 在窗體中添加1個(gè)命令按鈕(其Name屬性為Command1)和1個(gè)標(biāo)簽(其Name屬性為Lable1),然后編寫如下代碼: Private S
[單項(xiàng)選擇題] 在窗體中添加1個(gè)命令按鈕(其Name屬性為Command1)和1個(gè)標(biāo)簽(其Name屬性為Lable1),然后編寫如下代碼: Private Sub Commandl_Cliek() Dim arrayl(10, 10)As Integer Dim i, j, Sum AsIntegerSum=0 For i=1 To 10 Forj=1 To 10arrayl(i, j)=i+j Nextj Next i End Sub 此程序的功能是求數(shù)組arrayl主對角線元素的和,并把結(jié)果顯示在標(biāo)簽中,為實(shí)現(xiàn)此功能,省略號處的程序段應(yīng)該是 ( )
A.For i=1 To 10 For j=1 To 10 If i=j Then Sum = Sum+ arrayl (i, End If Next j Next i Label Caption=Sum
B.For i=l TO 10Forj=1 To 10 If i= =j Then Sum=Sum+array1 (i, End IfNext j Next i Label Caption=Sum
C.For i=1 To 10For j=1 To l0 If i=j Then Sum=Sum+arrayl (i, End IfNext iNext jLahel Caption=Sum
D.For i=1 To 10 For j=1 To l0If i=j ThenSum=arrayl (i,End If Next j Next i Label Caption=Sum
正確答案:A
參考解析:選項(xiàng)B中條件表達(dá)式i= =j有誤,在VB中表示i等于j,應(yīng)寫成i=j(luò)。排除選項(xiàng)B。選項(xiàng)C中的For......Next語句使用有誤,內(nèi)層應(yīng)該是Next j,外層為Next i。選項(xiàng)D中的求和語句有誤。應(yīng)為Sum= Sum+array1(i,j)。只有A項(xiàng)是正確的。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。