【正文】 A） Caption B） Name C） Backcolor D） Borderstyle （ 14）窗體的 Mousedown事件過程 Form_Mousedown (Button As Integer, Shift As Integer, X As Single, Y As Single) 有 4個參數(shù)，關于這些參數(shù)，正確的描述是 A）通過 Button參數(shù)判定當前 按下的是哪一個鼠標鍵 B） Shift參數(shù)只能用來確定是否按下 Shift鍵 C） Shift參數(shù)只能用來確定是否按下 Alt和 Ctrl鍵 全國計算機等級考試二級 VB 筆試試卷匯編 第 7 頁 共 81 頁 D）參數(shù) X,Y用來設置鼠標當前位置的坐標 （ 15）設組合框 Combo1中有 3個項目，則以下能刪除最后一項的語句是 A） Text B） 2 C） 3 D） （ 16）以下關于焦點的敘述中，錯誤的是 A） 如果文本框的 Tabstop屬性為 False，則不能接收從鍵盤上輸入的數(shù)據 B）當文本框失去焦點時，觸發(fā) Lostfocus事件 C）當文本框的 Enabled屬性為 False時，其 Tab順序不起作用 D）可以用 Tabindex屬性改變 Tab順序 （ 17）如果要在菜單中添加一個分隔線，則應將其 Caption 屬性設置為 A） = B） * C） amp。用于標識各個控件數(shù)組元素的參數(shù)是 A） Tag B） Index C） Listindex D） Name （ 19）在窗體上畫一個名稱為 Txta 的文本框，然后編寫如下的事件過程： Private Sub Txta_Keypress(Keyascii As Integer) …… End Sub 若焦點位于文本框中，則能夠觸發(fā) Keypress 事件的操作是 A）單擊鼠標 B）雙擊文本框 C）鼠標滑過文本框 D）按下鍵盤上的某個鍵 （ 21）假定有如下事件過程： Private Sub Form_Mousedown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then Popupmenu Popform End If End Sub 則以下描述中錯誤的是 A）該過程的功能是彈出一個菜單 B） Popform 是在菜單編輯器中定義的彈出式菜單的名稱 C）參數(shù) X、 Y 指明鼠標的當前位置 D） Button = 2 表示按下的是鼠標左鍵 （ 30）在窗體上畫一個名稱為 Commondialog1 的通用對話框，一個名稱為 Command1 的命令按鈕。為了在運行時隱藏該菜單項，應使用 的語句是 A) =True B) =False C) =True D) =False (29) 以下敘述中錯誤的是 A) 在程序運行時，通用對話框控件是不可見的 B) 在同一個程序中，用不同的方法 (如 Showopen 或 Showsave 等）打開的通用對話框具有不同的作用 C) 調用通用對話框控件的 Showopen 方法，可以直接打開在該通用對話框中指定的文件 D) 調用通用對話框控件的 Showcolor 方法，可以打開顏色對話框 (30) 在用通用對話框控件建立 “打開 ”或 “保存 ”文件對話框時，如果需要指定文件列表框所列出的文件類型是文本文件 (即 .Txt 文件 )，則正確的描述格式是 A) “Text (.Txt)|*.Txt)” B)“文本文件 ( .Txt) | (.Txt)” C) “Text(.Txt)||(*.Txt)” D)“Text(.Txt)(*.Txt)” 2022 年 4 月二級 VB （ 9）表示滾動條控件取值范圍最大值的屬性是 A） Max B） Largechange C） Value D） MaxMin （ 10）在窗體上畫一個名稱為 List1 的列表框，一個名稱為 Label1 的標簽。為了保存該應用程序，以下正確的操作是 A）只保存窗體模塊文件 B）分別保存窗體模塊、標準模塊和工程文件 C）只保存 窗體模塊和標準模塊文件 D）只保存工程文件 轉貼 （ 12）為了清除窗體上的一個控件，下列正確的操作是 A）按回車鍵 B）按 Esc 鍵 C）選擇（單擊）要清除的控件，然后按 Del 鍵 D）選擇（單擊）要清除的控件，然后按回車鍵 （ 13）以下敘述中錯誤的是 A）打開一個工程文件時，系統(tǒng)自動裝入與該工程有關的窗體、標準模塊等文件 B）當程序運行時，雙擊一個窗體，則觸發(fā)該窗體的 Dblclick 事件 C） Visual Basic 應用程序只能以解釋方式執(zhí)行 D）事件可以由用戶引發(fā)，也可以由 系統(tǒng)引發(fā) 全國計算機等級考試二級 VB 筆試試卷匯編 第 3 頁 共 81 頁 （ 33）如果一個工程含有多個窗體及標準模塊，則以下敘述中錯誤的是 A）任何時刻最多只有一個窗體是活動窗體 B）不能把標準模塊設置為啟動模塊 C）用 Hide 方法只是隱藏一個窗體，不能從內存中清除該窗體 D）如果工程中含有 Sub Main 過程，則程序一定首先執(zhí)行該過程 二、常用控件 2022 年 9 月二級 VB (11) 以下能夠觸發(fā)文本框 Change 事件的操作是 A) 文本框失去焦點 B) 文本框獲得焦點 C) 設置文本框的焦點 D) 改變文本框的內容 (12) 在窗體上有一個文本框控件，名稱為 Txttime：一個計時器控件，名稱為 Timerl，要求每一秒鐘在文本框中顯示一次當前的時間。程序為： Private Sub Timer1_ __() =Time End Sub 在下劃線上應填入的內容是 A) Enabled B) Visible C) Interval D) Timer (13) 在窗體上畫兩個單選按鈕，名稱分別為 Option Option2，標題分別為 “宋體 ”和 “黑體 ”；一個復選框，名稱 為 Check1,標題為 “粗體 ”；一個文本框，名稱為 Text1， Text 屬性為 “改變文字字體 ”。列表框中顯示若干城市的名稱。要求單擊命令按鈕時，打開一個保存文件的通用對話框。 D） （ 26）在窗體上畫兩個滾動條，名稱分別為 Hscroll1 、 Hscroll2；六個標簽，名稱分別為 Label LabelLabel Label Label Label6，其中標簽 Label 4~ Label6 分別顯示 A、 B、 A*B等文字信息，標簽 Label Label2分別顯示其右側的滾動條的數(shù)值， Label3 顯示 A*B的計算結果。以下不能實現(xiàn)上述功能的事件過程是 A） Private Sub Command1_Click() = Str(Val( )*Val( )) End Sub B） Private Sub Command1_Click() = * End Sub C） Private Sub Command1_Click() = Hscroll1 * Hscroll2 End Sub D） Private Sub Command1_Click() = Hscroll1. Text * End Sub （ 28）在窗體上畫一個名稱為 Text1的文本框，并編寫如下程序： 全國計算機等級考試二級 VB 筆試試卷匯編 第 8 頁 共 81 頁 Private Sub Form_Load() Show = End Sub Private Sub Form_Mouseup(Button As Integer, Shift As Integer, X As Single, Y As Single) Print 程序設計 End Sub Private Sub Text1_Keydown(Keycode As Integer, Shift As Integer) Print Visual Basic。程序運行后，如果移動滾動框，則在文本框中顯示滾動條的當前值，如圖所示： 以下能實現(xiàn)上述操作的程序段是 A) Private Sub Hscroll_Change() = End Sub B) Private Sub Hscroll_Click() = End Sub C) Private Sub Hscroll_Change() = End Sub D) Private Sub Hscroll_Click() = End Sub (4) 設菜單中有一個菜單項為 Open。Open D) 把 Name屬性設置為 Oamp。對于這個程序，以下敘述中錯誤的是 A) 標簽的移動方向為自右向左 B）單擊 “ 停止 ” 按鈕后再單擊 “ 開始 ” 按鈕，標簽從停止的位置繼續(xù)移動 C) 當標簽全部移出窗體后，將從窗體的另一端出現(xiàn)并重新移動 D）標簽按指定的時間時隔移動 2022 年 4 月二級 VB （ 11）在窗體（名稱為 Form1）上畫一個名稱為 Text1 的文本框和一個名稱為 Command1 的命令按鈕，然后編寫一個事件過程。 End Sub “A”，然后單擊窗體，則在窗體上顯示的內容是 A） Visual Basic B）程序設計 C） Visual Basic 程序設計 D） A 程序設計 （ 31）假定有下表所列的菜單結構： ━━━━━━━━━━━━━━━━━━━━ 名稱 層次 Appear 1（主菜單） Bigicon 2（子菜單） Smallicon 2（子菜單） “大圖標 ”，則在該菜單項前添加一個 “214。請在 [1] 和 [2] 處填入適當?shù)膬热荩瑢⒊绦蜓a充完整。 Private Sub Command1_Click() For I=0 To 3 If [3] =True Then Opt=Option1(I).Caption End If Next Select Case [4] Case ”+” Result=Val()+Val() Case ” ” Result=Val()Val() Case ”*” Result=Val()*Val() Case ”/” Result=Val()/Val() End Select [5] =Result End Sub (3) 在窗體上畫一個名稱為 Command1 的命令按鈕和一個名稱 為 Text1的文本框。 全國計算機等級考試二級 VB 筆試試卷匯編 第 19 頁 共 81 頁 Private Sub Form_Load() =False End Sub Private Sub Text1_ [6] () =True End Sub (4) 在菜單編輯器中建立了一個菜單，名為 Pmenu，用下面的語句可以把它作為彈出式菜單彈出，請?zhí)羁?。當雙擊列表框中的某個項目時，在標簽 Label1 中顯示所選中的項目，如圖所示。 全國計算機等級考試二級 VB 筆試試卷匯編 第 20 頁 共 81 頁 填空題 （ 9）在窗體上畫一個名稱為 Combo1 的組合框，畫兩個名稱分別 Label1 和 Label2 及 Caption 屬性分別為城市名稱 和空白的標簽 。 （ 3）在窗體上畫一個標簽（名稱為 Label1）和一個計時器（名稱為 Timer1），然后編寫如下幾個事件過程： 全國計算機等級考試二級 VB 筆試試卷匯編 第 21 頁 共 81 頁 Private Sub Form_Load() = False = 【 5】 End Sub Private Sub Form_Click() = 【 6】 End Sub Private Sub Timer1_Timer() = 【 7】 End Sub 程序運行后，單擊窗體，將在標簽中顯示當前時間，每隔 1秒鐘變換一次。程序運行后，在列表框中選擇一個項目，然后單擊命令按鈕，即可將所選擇的項目刪除，并在標簽中顯示列表框當前的項目數(shù)， 運行情況如圖所示 (選擇 第三個項目 的情況 )。以下是實現(xiàn)上述功能的程序，請?zhí)羁铡? (6) 在窗體上畫一個名稱為 Text1 的文本框，然后畫三個單選按鈕，并用這三個單選按鈕建立一個控件數(shù)組，名稱為 Option1，程序運行后，如果單擊某個單選按鈕，則文本框中的字體將根據所選擇的單選按鈕切換，如圖所示，請