【正文】
示多行文本,應設置為True的屬性是A)Enabled B)MultiLine C)MaxLength D)Width(12)在窗體上有一個名為Text1的文本框。2007年9月全國計算機等級考試二級筆試試卷Visual Basic語言程序設計(考試時間90分鐘,滿分100分)一、 選擇題(每小題2分,共70分) 下列各題A)、B)、C)、D)四個選項中,只有一個選項是正確的。請將正確選項填涂在答題卡相應位置上,答在試卷上不得分。當光標在文本框中時,如果按下字母鍵“A”,則被調(diào)用的事件過程是A)Form_KeyPress( ) B)Text1_LostFocus( )C)Text1_Click( ) D)Text1_Change( )(13)設在窗體上有一個名稱為Command1的命令按鈕和一個名稱為Text1的文本框。下面正確的事件過程是A)Private Sub Command1_Click() B)Private Sub Command1_Click() End Sub End SubC)Private Sub Command1_Click() D)Private Sub Command1_Click() End Sub End Sub(14)執(zhí)行以下程序后輸出的是Private Sub Command1_Click() ch$ = ABCDEFGH Print Mid(Right(ch$, 6), Len(Left(ch$, 4)), 2)End SubA)CDEFGH B)ABCD C)FG D)AB(15)設在窗體Form1上有一個列表框List1,其中有若干個項目。要求選中某一項后單擊Command1按鈕,就刪除選中的項,則正確的事件過程是A)Private Sub Command1_Click() End Sub B)Private Sub Command1_Click() End SubC)Private Sub Command1_Click() End SubD)Private Sub Command1_Click() End Sub(20)某人設計了如下程序用于計算并輸出 7!(7的階乘)Private Sub Command1_Click() t = 0 For k = 7 To 2 Step 1 t = t * k Next Print tEnd Sub執(zhí)行程序時,發(fā)現(xiàn)結果是錯誤的。要求程序執(zhí)行時單擊“保存”菜單項,則把其標題顯示在Text1文本框中。希望在程序運行時,可以每2秒在標簽上顯示一次系統(tǒng)當前時間。下列不屬于這6種幾何圖形的是A) B) C) D)(25)下面關于文件的敘述中錯誤的是A)隨機文件中各條記錄的長度是相同的B)打開隨機文件時采用的文件存取方式應該是RandomC)向隨機文件中寫數(shù)據(jù)應使用語句 Print 文件號D)打開隨機文件與打開順文件一樣,都使用Open語句(26)設窗體上有一個圖片框Picture1,能實現(xiàn)此功能的語句是A) = B) = LoadPicture()C)LoadPicture() D)Call LoadPicture()(27)下面程序執(zhí)行時,在窗體上顯示的是Private Sub Command1_Click() Dim a(10) For k = 1 To 10 a(k) = 11 k Next k Print a(a(3) \ a(7) Mod a(5))End SubA)3 B)5 C)7 D)9(28)為達到把a、b中的值交換后輸出的目的,某人編程如下:Private Sub Command1_Click() a% = 10: b% = 20 Call swap(a, b) Print a, bEnd SubPrivate Sub swap(ByVal a As Integer, ByVal b As Integer) c = a: a = b: b = cEnd Sub在運行時發(fā)現(xiàn)輸出結果錯了,需要修改。 Mid(ch, k, 1) Next k ch = sEnd SubA)ABCDEF B)FEDCBA C)A D)F(31)某人編寫了一個能夠返回數(shù)組a中10個數(shù)中最大數(shù)的函數(shù)過程,代碼如下:Function MaxValue(a() As Integer) As Integer Dim max% max = 1 For k = 2 To 10 If a(k) a(max) The