2004 年 9 月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 語(yǔ)言筆試試題及答案 計(jì)算機(jī)二級(jí)考試 一 選擇題 1 20 每小題 2 分 21 30 每小題 3 分 共 70 分下列各 題 A B C D 四個(gè)選項(xiàng)中 只有一個(gè)選項(xiàng)是正確的 請(qǐng)將正確選項(xiàng)填涂在答題 卡相應(yīng)位置上 答在試卷上不得分 1 設(shè)窗體上有一個(gè)文本框 名稱為 text1 程序運(yùn)行后 要求該文本框只能顯示 信息 不能接受輸入的信息 以下能實(shí)現(xiàn)該操作的語(yǔ)句是 A Text1 MaxLength 0 B Text1 Enabled Flase C Text1 Visible Flase D Text1 Width 0 2 以下能在窗體 Form1 的標(biāo)題欄中顯示 VisualBasic 窗體 的語(yǔ)句是 A Form1 Name VisualBasic 窗體 B Form1 Title VisualBasic 窗體 C Form1 Caption VisualBasic 窗體 D Form1 Text VisualBasic 窗體 3 在窗體上畫一個(gè)名稱為 Text1 的文本框 然后畫一個(gè)名稱為 HScroll1 的滾動(dòng) 條 其 Min 和 Max 屬性分別為 0 和 100 程序運(yùn)行后 如果移動(dòng)滾動(dòng)框 則在文 本框中顯示滾動(dòng)條的當(dāng)前值 如圖所示 以下能實(shí)現(xiàn)上述操作的程序段是 A Private Sub Hscroll1 Change Text1 Text HScroll1 Value End Sub B Private Sub Hscroll1 Click Text1 Text HScroll1 Value End Sub C Private Sub Hscroll1 Change Text1 Text Hscroll1 Caption End Sub D Private Sub Hscroll1 Click Text1 Text Hscroll1 Caption End Sub 4 設(shè)菜單中有一個(gè)菜單項(xiàng)為 Open 若要為該菜單命令設(shè)置訪問(wèn)鍵 即按下 Alt 及字母 O 時(shí) 能夠執(zhí)行 Open 命令 則在菜單編輯器中設(shè)置 Open 命令的方式 是 A 把 Caption 屬性設(shè)置為 Next i End Sub 程序運(yùn)行后 單擊命令按鈕 在窗體上顯示的內(nèi)容是 A 1 2 B 1 2 3 C 3 4 5 D 4 5 30 假定一個(gè)工程由一個(gè)窗體文件 Form1 和兩個(gè)標(biāo)準(zhǔn)模塊文件 Model1 及 Model2 組成 Model1 代碼如下 Public x As Integer Public y As Integer Sub S1 x 1 S2 End Sub Sub S2 y 10 Form1 Show End Show Model2 的代碼如下 Sub Main S1 End Sub 其中 Sub Main 被設(shè)置為啟動(dòng)過(guò)程 程序運(yùn)行后 各模塊的執(zhí)行順序是 A Form1 Model1 Model2 B Model1 Model2 Form1 C Model2 Model1 Form1 D Model2 Form1 Model1 轉(zhuǎn)貼于 計(jì)算機(jī)二級(jí)考試 考試大 二 填空題 每空 2 分 共 30 分 請(qǐng)將每空的正確答案寫在答題卡 1 15 序號(hào)的橫線上 答在試卷上 不得分 1 設(shè)有如下程序段 a BeijingShanghai b Mid a InStr a g 1 執(zhí)行上面的程序段后 變量 b 的值為 1 2 以下程序段的輸出結(jié)果是 2 num 0 While numa 3 Then m a 2 ElseIf a 1 a 3 Then m 9 Else m 10 End If Print 中間數(shù)是 m End Sub 程序運(yùn)行后 單擊窗體 在輸入對(duì)話框中分別輸入三個(gè)整數(shù) 程序?qū)⑤敵?三個(gè)數(shù)中的中間數(shù) 如圖所示 請(qǐng)?zhí)羁?6 在窗體上畫一個(gè)名稱為 Command1 標(biāo)題為 計(jì)算 的命令按鈕 再畫 7 個(gè)標(biāo)簽 其中 5 個(gè)標(biāo)簽組成名稱為 Label1 的控件數(shù)組 名稱為 Label2 的標(biāo)簽用 于顯示計(jì)算結(jié)果 其 Caption 屬性的初始值為空 標(biāo)簽 Label3 的標(biāo)題為 計(jì)算 結(jié)果 運(yùn)行程序時(shí)會(huì)自動(dòng)生成 5 個(gè)隨機(jī)數(shù) 分別顯示在標(biāo)簽控件數(shù)組的各個(gè)標(biāo) 簽中 如圖所示 單擊 計(jì)算 按鈕 則將標(biāo)簽數(shù)組各元素的值累加 然后計(jì)算 結(jié)果顯示在 Label2 請(qǐng)?zhí)羁?Private Sub Command1 Click Sum 0 For i 0 To 4 Sum Sum 11 Next 12 Sum End Sub 7 在窗體上畫兩個(gè)名稱分別為 Command1 和 Command2 標(biāo)題分別為 初始化 和 求和 的命令按鈕 程序運(yùn)行后 如果單擊 初始化 命令按鈕 則對(duì)數(shù)組 a 的各元素賦值 如果單擊 求和 命令按鈕 則求出數(shù)組 a 的各元素之和 并 在文本框中顯示出來(lái) 如圖所示 請(qǐng)?zhí)羁?Option Base 1 Dim a 3 2 As Integer Private Sub Command1 Click For i 1 To 3 For j 1 To 2 13 i j Next j Next i End Sub Private Sub Command2 Click For j 1 To 3 For i 1 To 2 s s 14 Next i Next j Text1 Text 15 End Sub 轉(zhuǎn)貼于 計(jì)算機(jī)二級(jí)考試 考試大 2004 年 9 月全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB 語(yǔ)言筆試試題答案 一 選擇題 1 20 每小題 2 分 21 30 每小題 2 分 共 70 分 1 B 2 C 3 A 4 A 5 C 6 D 7 D 8 B 9 A 10 B 11 D 12 A 13 C 14 C 15 D 16 A 17 B 18 B 19 D 20 D 21 B 22 D 23 C 24 B 25 C 26 A 27 A 28 B 29 D 30 C 二 填空題 每空 2 分 共 30 分 1 Shanghai 2 3 3