[計(jì)算機(jī)]2004年9月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)vb語(yǔ)言筆試試題及答案-在線瀏覽
2025-02-26 01:07本頁(yè)面
【正文】 在窗體上畫(huà)一個(gè)名稱(chēng)為 Command1 的命令按鈕，并編寫(xiě)如下程序： Private Sub Command1_Click（） Dim x As Integer Static y As Integer x=10 y=5 Call f1（ x,y） Print x,y End Sub Private Sub f1（ ByRef x1 As Integer, y1 As Integer） x1=x1+2 y1=y1+2 End Sub 程序運(yùn)行后，單擊命令按鈕，在窗體上顯示的內(nèi)容是 A） 10 5 B） 12 5 C） 10 7 D） 12 7 （ 23） 設(shè)有如下程序 Option Base 1 Private Sub Command1_Click（） Dim a（ 10） As Integer Dim n As Integer n=InputBox（ 輸入數(shù)據(jù) ） If n10 Then Call GetArray（ a,n） End If End Sub Private Sub GetArray（ b（） As Integer,n As Integer） Dim c（ 10） As Integer j=0 For i=1 To n b（ i） =CInt（ Rnd（） *100） If b（ i） /2=b（ i） \2 Then j=j+1 c（ j） =b（ i） End If Next Print j End Sub 以下敘述 中錯(cuò)誤的是 A）數(shù)組 b 中的偶數(shù)被保存在數(shù)組 c 中 B）程序運(yùn)行結(jié)束后，在窗體上顯示的是 c 數(shù)組中元素的個(gè)數(shù) C） GetArray 過(guò)程的參數(shù) n 是按值傳送的 D）如果輸入的數(shù)據(jù)大于 10，則窗體上不顯示任何 信息 6 （ 24） 在窗體上畫(huà)一個(gè)名稱(chēng)為 Command1 的命令按鈕，然后編寫(xiě)如下事件過(guò)程： Option Base 1 Private Sub Command1_Click（） Dim a a= Array（ 1,2,3,4,5） For i=1 To UBound（ a） a（ i） = a（ i） +i1 Next Print a（ 3） End Sub 程序運(yùn)行后，單擊命令按鈕，則在窗體上顯示的內(nèi)容是 A） 4 B） 5 C） 6 D） 7 （ 25） 閱讀程序 Option Base 1 Private Sub Form_Click（） Dim arr,Sum Sum = 0 arr = Array（ 1,3,5,7,9,11,13,15,17,19） For i=1 To 10 If arr（ i） /3 = arr（ i） \3 Then Sum =Sum+arr（ i） End If Next i Print Sum End Sub 程序運(yùn)行后，單擊窗體，輸 出 結(jié)果為 A） 13 B） 14 C） 27 D） 15 （ 26） 在窗體上畫(huà)一個(gè)名稱(chēng)為 File1 的文件列表框，并編寫(xiě)如下程序： Private Sub File1_DblClick（） x=Shell（ ,1） End Sub 以下關(guān)于該程序的敘述中，錯(cuò)誤的是 A） x 沒(méi)有實(shí)際作用，因此可以將 該語(yǔ)句寫(xiě)為： Call Shell（ ,1） B） 雙擊文件列表框中的文件，將觸發(fā)該事件過(guò)程 C） 要執(zhí)行的文件的名字通過(guò) 指定 D） File1 中顯示的是當(dāng)前驅(qū)動(dòng)器、當(dāng)前目錄下的文件 （ 27） 在窗體上畫(huà)一個(gè)名稱(chēng)為 Label標(biāo)題為“ VisualBasic 考試”的標(biāo)簽，兩個(gè)名稱(chēng)分別為Command1 和 Command標(biāo)題分別為“開(kāi)始”和“停止”的命令按鈕，然后畫(huà)一個(gè)名稱(chēng)為T(mén)imer1 的計(jì)時(shí)器控件，并把其 Interval 屬性設(shè)置為 500,如圖所示。 對(duì)于這個(gè)程序，以下敘述中錯(cuò)誤的是 A） 標(biāo)簽的移動(dòng)方向?yàn)樽杂蚁蜃? B）單擊“停止”按鈕后再單擊“開(kāi)始”按鈕，標(biāo)簽從停止的位置繼續(xù)移動(dòng) C） 當(dāng)標(biāo)簽全部移出窗體后，將從窗體的另一端出現(xiàn)并重新移動(dòng) D）標(biāo)簽按指定的時(shí)間時(shí)隔移動(dòng) （ 28） 執(zhí)行以下程序段 a$=abbacddcba For i=
試題試卷相關(guān)推薦
鄂ICP備17016276號(hào)-1