【文章內(nèi)容簡(jiǎn)介】 多重窗體程序中，各窗體的菜單是彼此獨(dú)立的 C）在多重窗體程序中，可以根據(jù)需要指定啟動(dòng)窗體 D） 在 多重窗體程序中，需要單獨(dú)保存每個(gè)窗體 (11) 以下敘述中錯(cuò)誤的是 A）事件過(guò)程是響應(yīng)特定事件的一段程序 B）不同的對(duì)象可以具有相同名稱(chēng)的方法 C）對(duì)象 的方法是執(zhí)行指定操作的過(guò)程 D）對(duì)象事件的名稱(chēng)可以由編程者指定 (13) 當(dāng)一個(gè)復(fù)選框被選中時(shí)，它的 Value屬性的值是 A) 3 B) 2 C) 1 D) 0 (18) 以下敘述中錯(cuò)誤的是 A) 在 Keypress事件過(guò)程中不能識(shí)別鍵盤(pán)的按下與釋放 B) 在 Keypress 事件過(guò)程中不能識(shí)別回車(chē)鍵 C) 在 Keydown和 Keyup事件過(guò)程中，將鍵盤(pán)輸入的 A和 A視作相同的字母 D) 在 Keydown和 Keyup事件過(guò)程中，從大鍵盤(pán)上輸入的 1和從右側(cè)小鍵盤(pán)上輸入的 1被視作不同的字符 (20)在窗體上畫(huà)一個(gè)名稱(chēng)為 Commanddialog1的通用對(duì)話(huà)框，一個(gè)名稱(chēng)為 Command1的命令按鈕。然后編寫(xiě)如下事件過(guò)程： Private Sub Command1_Click() = =All File|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt =2 =Vbtest =1 End Sub 對(duì)于這個(gè)程序，以下敘述中錯(cuò)誤的是 A） 該對(duì)話(huà)框被設(shè)置為 “ 打開(kāi) ” 對(duì)話(huà)框 B） 在該對(duì)話(huà)框中指定的默認(rèn)文件名為空 C） 該對(duì)話(huà)框的標(biāo)題為 Vbtest D） 在該對(duì)話(huà)框中指定的默認(rèn)文件類(lèi)型為文本文件 (*.Txt) (27) 在窗體上畫(huà)一個(gè)名稱(chēng)為 Label標(biāo)題為 “Visual Basic考試 ” 的標(biāo)簽，兩個(gè)名稱(chēng)分別為 Command1和 Command標(biāo)題分別為 “ 開(kāi)始 ” 和 “ 停止 ” 的命令按鈕，然后畫(huà)一個(gè)名稱(chēng)為 Timer1的計(jì)時(shí)器控件，并把其 Interval屬性設(shè)置為 500,如圖所示。 編寫(xiě)如下程序： 全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 筆試試卷匯編 第 13 頁(yè) 共 81 頁(yè) Private Sub Form_Load() =False End Sub Private Sub Command1_Click() =True End Sub Private Sub Timer1_Timer() If Width Then = + 20 Else =0 End If End Sub 程序運(yùn)行后，單擊 “ 開(kāi)始 ” 按鈕，標(biāo)簽在窗體中移動(dòng)。對(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) 2022 年 4 月二級(jí) VB （ 11）在窗體（名稱(chēng)為 Form1）上畫(huà)一個(gè)名稱(chēng)為 Text1 的文本框和一個(gè)名稱(chēng)為 Command1 的命令按鈕，然后編寫(xiě)一個(gè)事件過(guò)程。程序運(yùn)行以后，如果在文本框中輸入一個(gè)字符，則把命令按鈕的標(biāo)題設(shè)置為“計(jì)算機(jī)等級(jí)考試”。以下能實(shí)現(xiàn)上述操作的事件過(guò)程是： A)Private Sub Text1_Change() =”計(jì)算機(jī)等級(jí)考試 ” End Sub B) Private Sub Command1_Click() Caption=”計(jì)算機(jī)等級(jí)考試 ” End Sub C) Private Sub Form1_Click() =”計(jì)算機(jī)等級(jí)考試 ” 全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 筆試試卷匯編 第 14 頁(yè) 共 81 頁(yè) End Sub D) Private Sub Command1_Click() =”計(jì)算機(jī)等級(jí)考試 ” End Sub (16)為了使命令按鈕 (名稱(chēng)為 Command1)右移 200，應(yīng)使用的語(yǔ)句是 A) 200 B) 200 C) = +200 D) = （ 18）在窗體上畫(huà)一個(gè)文本框和一個(gè)計(jì)時(shí)器控件，名稱(chēng)分別為 Text1 和 Timer1,在屬性窗口中把計(jì)時(shí)器的Interval 屬性設(shè)置為 1000， Enabled 屬性設(shè)置為 False,程序運(yùn)行后，如果單擊命令按鈕，則每隔一秒鐘在文本框中顯示一次當(dāng)前的時(shí)間。以下是實(shí)現(xiàn)上述操作的程序： Private Sub Command1_Click() End Sub Private Sub Timer1_Timer() = Time End Sub 在 ______處應(yīng)填入的內(nèi)容是 A)Enabled=True B)Enabled=False C)Visible=True D)Visible=False (19)假定在圖片框 Picture1 中裝入了一個(gè)圖形，為了清除該圖形（不刪除圖片框），應(yīng)采用的正確方法是： A)選擇圖片框，然后按 Del 鍵 B)執(zhí)行語(yǔ)句 =Loadpicture(“”) C)執(zhí)行語(yǔ)句 =”” D)選擇圖片框，在屬性窗口中選擇 Picture 屬性，然后按回車(chē)鍵 （ 20） 在窗體上畫(huà)一個(gè) List1 的列表框，一個(gè)名稱(chēng)為 Label1 的標(biāo)簽，列表框中顯示若干個(gè)項(xiàng)目，當(dāng)單擊列表框中的某個(gè)項(xiàng)目時(shí)，在標(biāo)簽中顯示被選中的項(xiàng)目的名稱(chēng)，下列能正確實(shí)現(xiàn)上述操作的程序是 A) Private Sub List1_Click() = End Sub B) Private Sub List1_Click() = End Sub C) Private Sub List1_Click() = End Sub 全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 筆試試卷匯編 第 15 頁(yè) 共 81 頁(yè) D) Private Sub List1_Click() = End Sub （ 24）在 Visual Basic 工程中，可以作為啟動(dòng)對(duì)象的程序是 A)任何窗體或標(biāo)準(zhǔn)模塊 B)任何窗體或過(guò)程 C)Sub Main 過(guò)程或其他任何模塊 D)Sub Main 過(guò)程或任何窗體 (25)假定建立了一個(gè)名為 Command1 的命令按鈕數(shù)組，則以下說(shuō)法中錯(cuò)誤的是 A)數(shù)組中每個(gè)命令按鈕的名稱(chēng) (名稱(chēng)屬性 )均為 Command1 B)數(shù)組中每個(gè)命令按鈕的標(biāo)題 (Caption 屬性 )都一樣 C)數(shù)組中所有命令按鈕可以使用同一個(gè)事件過(guò)程 D)用名稱(chēng) Command1(下標(biāo) )可以訪問(wèn)數(shù)組中的每個(gè)命令按鈕 (26)把窗體的 Keypreview 屬性設(shè)置為 True，然后編寫(xiě)如下事件過(guò)程 : Private Sub Form_Keypress(Keyascii As Integer) Dim Ch As String Ch = Chr(Keyascii) Keyascii = Asc(Ucase(Ch)) Print Chr(Keyascii + 2) End Sub 程序運(yùn)行后 ,按鍵盤(pán)上的 ”A”鍵 ,則在窗體上顯示的內(nèi)容是 A)A B)B C)C D)D 2022 年 9 月二級(jí) VB （ 19）在窗體上畫(huà)一個(gè)列表框和一個(gè)命令按鈕，其名稱(chēng)分別為 List1 和 Command1，然后編寫(xiě)如下事件過(guò)程： Private Sub Form_Load() Item 1 Item 2 Item 3 End Sub Private Sub Command1_Click() () = AAAA End Sub A）把字符串 “AAAA”添加到列表框中，但位置不能確定 B）把字符串 “AAAA”添加到列表框的最后（即 “Item 3”的后面） C）把列表框中原有的最后一項(xiàng)改為 “AAAA” 全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 筆試試卷匯編 第 16 頁(yè) 共 81 頁(yè) D）把字符串 “AAAA”插入到列表框的最前面（即 “Item 1”的前面） （ 29）以下關(guān)于 Keypress 事件過(guò)程中參數(shù) Keyascii 的敘述中正確的是 A） Keyascii 參數(shù)是所按鍵的 ASCII 碼 B） Keyascii 參數(shù)的數(shù)據(jù)類(lèi)型為字符串 C） Keyascii 參數(shù)可以省略 D） Keyascii 參數(shù)是所按鍵上標(biāo)注的字符 （ 30）設(shè)窗體上有一個(gè)名為 Text1 的文本框，并編寫(xiě)如下程序： Private Sub Form_Load() Show = End Sub Private Sub Form_Mouseup(Button As Integer, _ Shift As Integer, X As Single, Y As Single) Print 程序設(shè)計(jì) End Sub Private Sub Text1_Keydown(Keycode As Integer, Shift As Integer) Print Visual Basic。 End Sub “A”，然后單擊窗體，則在窗體上顯示的內(nèi)容是 A） Visual Basic B）程序設(shè)計(jì) C） Visual Basic 程序設(shè)計(jì) D） A 程序設(shè)計(jì) （ 31）假定有下表所列的菜單結(jié)構(gòu)： ━━━━━━━━━━━━━━━━━━━━ 名稱(chēng) 層次 Appear 1（主菜單） Bigicon 2（子菜單） Smallicon 2（子菜單） “大圖標(biāo) ”，則在該菜單項(xiàng)前添加一個(gè) “214。”。以下 正確的事件過(guò)程是 A） Private Sub Bigicon_Click() = False End Sub B） Private Sub Bigicon_Click() Me. = True 全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 筆試試卷匯編 第 17 頁(yè) 共 81 頁(yè) End Sub C） Private Sub Bigicon_Click() = True End Sub D） Private Sub Bigicon_Click() = True End Sub （ 32）假定通用對(duì)話(huà)框的名稱(chēng)為 Commondialog1，命令按鈕的名稱(chēng)為 Command1，則單擊命令按鈕后，能使打開(kāi)的對(duì)話(huà)框的標(biāo)題為 “New Title”的事件過(guò)程是 A） Private Sub Command1_Click() = New Title End Sub B） Private Sub Command1_Click() = New Title End Sub C） Private Sub Command1_Click() = New Title End Sub D） Private Sub Command1_Click() = New Title End Sub 填空題 2022 年 9 月二級(jí) VB (1) 在窗體上畫(huà)兩個(gè)標(biāo)簽，其名稱(chēng)分別為 Label1和 Label2,Caption屬性分別為 “ 數(shù)值 ” 及空白；然后畫(huà)一個(gè)名稱(chēng)為 Hscoll1的水平滾動(dòng)條，其 Min的值為 0， Max 的值為 100。程序運(yùn)行后，如果單擊滾動(dòng)條兩端的箭頭，則在標(biāo)簽 Lable2 中顯示滾動(dòng)條的值，如圖所示。請(qǐng)?jiān)? [1] 和 [2] 處填入適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。 全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 筆試試卷匯編 第 18 頁(yè) 共 81 頁(yè) Private Sub Hscroll1_ [1] () =Hscroll1. [2] End Sub (2) 在窗體上畫(huà)一個(gè)名稱(chēng)為 Command標(biāo)題為 “ 計(jì)算 ” 的命令按 鈕；畫(huà)兩個(gè)文本框，名稱(chēng)分別為 Text1和Text2；然后畫(huà) 4個(gè)標(biāo)簽，名稱(chēng)分別為 Label Label Label3和 Label4，標(biāo)題分別為 “ 操作數(shù) 1” 、“ 操作數(shù) 2” 、 “ 運(yùn)算結(jié)果 ” 和空白；再建立一個(gè)含有 4個(gè)單選按紐的控件數(shù)組，名稱(chēng)為 Option1，標(biāo)題分別為 “+” 、 “ ” 、 “*” 和 “/” 。程序運(yùn)行后，在 Text Text2中輸入兩個(gè)數(shù)值，選中一個(gè)單選按鈕后單擊命令按鈕，相應(yīng)的計(jì)算結(jié)果顯示在 Label4，程序運(yùn)行情況如圖所示。請(qǐng)?jiān)? [3] 、 [4] 和 [5] 處填入適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。 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