[單項(xiàng)選擇題] 在窗體上畫(huà)一個(gè)文本框,然后編寫(xiě)如下程序: Option Base 1 Private Sub Form_Click() Dim Arr(1
2021-07-20
[單項(xiàng)選擇題] 在窗體上畫(huà)一個(gè)文本框,然后編寫(xiě)如下程序: Option Base 1 Private Sub Form_Click() Dim Arr(10)As IntegerFor i=6 To 10 Arr(i)=i-3Next iText1.Text:Str(Arr(6)+Arr(Arr(6)+Arr(10))) End Sub 程序運(yùn)行后,單擊窗體,在文本框中顯示的內(nèi)容是
A.1
B.3
C.6
D.10
正確答案:D
參考解析:[分析] 在本題中,定義了一個(gè)一維數(shù)組Arr,并為其開(kāi)辟了10個(gè)元素的空間,然后通過(guò)For循環(huán)為該數(shù)組的后5個(gè)元素賦值。不難看出,數(shù)組Arr后5個(gè)元素的值分別為3、4、5、6、 7。最后一個(gè)語(yǔ)句是為文本框的Text屬性賦值,這個(gè)值是Arr數(shù)組的兩個(gè)元素之和,其中第一個(gè)元素是Arr(6),即3;第二個(gè)元素的下標(biāo)是數(shù)組Arr第六個(gè)元素(3)和第十個(gè)元素(7)的和,即 Arr(3+7)=Arr(10),而該元素的值為7。因此, Arr(6)+Arr(Arr(6)+Arr(10))=3+Arr(10)=3+ 7=10
詞條內(nèi)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。