年全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí)VB全真上機(jī)試題解析

1、XXXX年全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB全真上機(jī)試題解XXXX年全國(guó)計(jì)算機(jī)等級(jí)考試二級(jí) VB全真上機(jī)試題解析第 1 題： ?在考生文件夾下有一個(gè)工程文件 sjt5.vbp ，其窗體上有一個(gè)文本框，名稱(chēng)為T(mén)extl ;還有兩個(gè)命令按鈕，名稱(chēng)分別為 C1、C2,標(biāo)題分別 為"計(jì)算"、 "存盤(pán)"，如圖所示。并有一個(gè)函數(shù)過(guò)程 isprime 可以在程序中直接調(diào) 用，其功能是判斷參數(shù)a是否為素?cái)?shù)，如果是素?cái)?shù)，則返回True，否則返回False。 請(qǐng)編寫(xiě)適當(dāng)?shù)氖录^(guò)程,使得在運(yùn)行時(shí),單擊 "計(jì)算"按鈕,則找出小于 18000 的的素?cái)?shù)， 并顯示在

2、Text1 中;單擊" 存盤(pán)" 按鈕， 則把 Text1 中的計(jì)算結(jié)果存入 考生文件夾下的 out5.txt 文件中。 ?本題的考查主要有兩個(gè) , 一個(gè)是循環(huán) ,一個(gè)是文件的訪問(wèn)。 ? 由于在小于 1 8000中尋找素?cái)?shù) ,并且判斷 素?cái)?shù)的函數(shù)已經(jīng)給出 ,只要使用一個(gè)循環(huán)在 18000 以下尋找,沒(méi)有找到減一再尋 找,找到記錄在TextI.Text中,在結(jié)構(gòu)化的程序中不再提倡 GoTc以及從結(jié)構(gòu)體中 退出（例如 ExitFor 等）, 使用 While 判斷是一個(gè)較好的選擇。第 2 題： ?在考生文件夾下有一個(gè)工程文件 sjt4.vbp ，窗體上已經(jīng)有兩個(gè)文本框，名稱(chēng)分別為

3、 Textl、Text2 ;和一個(gè)命令按鈕，名稱(chēng)為 C1，標(biāo)題 為"確定"請(qǐng)畫(huà)兩個(gè)單選按鈕，名稱(chēng)分別為 0p1 0p2標(biāo)題分別為"男生"、"女 生"再畫(huà)兩個(gè)復(fù)選框，名稱(chēng)分別為 Ch1、Ch2,標(biāo)題分別為"體育"、"音樂(lè)"。請(qǐng) 編寫(xiě)適當(dāng)?shù)氖录^(guò)程，使得在運(yùn)行時(shí)，單擊 "確定"按鈕后實(shí)現(xiàn)下面的要求： ?1）根據(jù)選中的單選按鈕，在 Text1 中顯示"我是男生"或"我是女生 "。?2）根據(jù)選中的復(fù)選框， 在 Text2 中顯示"我的

4、愛(ài)好是體育 "或"我的愛(ài)好是音樂(lè) "或"我的愛(ài)好是體育音樂(lè) "。如圖所示。 ? 注意：不得修改已經(jīng)給 出的程序和已有控件的屬性。 在結(jié)束程序運(yùn)行之前， 必須選中一個(gè)單選按鈕和至 少一個(gè)復(fù)選框，并單擊 " 確定"按鈕。必須使用窗體右上角的關(guān)閉按鈕結(jié)束程序， 否則無(wú)成績(jī)。？?？ 分析：?jiǎn)芜x按鈕OptionButton和選擇框CheckBox的簡(jiǎn)單 應(yīng)用OptionButton控件和CheckBox控件功能相似，但是二者間也存在著重要差 別。在選擇一個(gè) 0ptionButton 時(shí)，同組中的其它 0ptionButton 控件自動(dòng)

5、無(wú)效。 相反，可以選擇任意數(shù)量的 CheckBox控件。？?？只要注意了這一點(diǎn)本題可以在 C1_Click 事件中判斷他們的選中情況 OptionButton 的 Value 為 True 表示 選中,CheckBox的Value=1時(shí)表示選中。第3題：？?？在名稱(chēng)為Form1的窗體上畫(huà)一個(gè)標(biāo)簽，名稱(chēng)為 L1,標(biāo)簽上顯示"請(qǐng)輸入密碼 "，在標(biāo)簽的右邊畫(huà)一個(gè)文本框，名稱(chēng)為 Text1 ，其寬、高分別為XXXX和300,設(shè)置適當(dāng)?shù)膶傩允沟迷谳斎朊艽a時(shí)，文本框中顯示"*"字符，此外再把窗體的標(biāo)題設(shè)置為 "密碼窗口"，以上這些設(shè)置都只能在屬性

6、窗口中進(jìn)行 設(shè)置，運(yùn)行時(shí)的窗體如圖所示。 *注意：存盤(pán)時(shí)必須存放在考生文件夾下，工程 文件名為 sjt1.vbp ，窗體文件名為 sjt1.frm 。? 分析：創(chuàng)建的對(duì)象設(shè)置 屬性。屬性窗口（選中對(duì)按 F4 調(diào)出）給出了設(shè)置所有的窗體對(duì)象屬性的簡(jiǎn)便方 法。在"視圖"菜單中選擇 "屬性窗口"命令、單擊工具欄上的 "屬性窗口 "按鈕或使 用控件的上下文菜單，都可以打開(kāi)屬性窗口。在本題中要求對(duì)于密碼框的設(shè)定 , 只要為T(mén)extl的PasswordChar屬性設(shè)置為*即可完成？?？第4題：？?？在考生文件夾下有一個(gè)工程文件 sjt3.vbP，

7、窗體上已經(jīng)有一個(gè)標(biāo)簽L1,請(qǐng)畫(huà)一 個(gè)單選按鈕數(shù)組，名稱(chēng)為0p1,含三個(gè)單選按鈕，它們的Index屬性分別為0、1、 2，標(biāo)題依次為 " 飛機(jī)" 、" 火車(chē)" 、" 汽車(chē)"，再畫(huà)一個(gè)名稱(chēng)為 Text1 的文本框。窗 體文件中已經(jīng)給出了 Op1的Click事件過(guò)程，但不完整，要求去掉程序中的注釋 符，把程序中的？改為正確的內(nèi)容， 使得在運(yùn)行時(shí)單擊 "飛機(jī)"或"火車(chē)"單選按鈕 時(shí)，在 Text1 中顯示"我坐飛機(jī)去 "或"我坐火車(chē)去 "，單擊"汽車(chē)&q

8、uot;單選按鈕時(shí)， 在 Text1 中顯示"我開(kāi)汽車(chē)去 "，如圖所示。注意：不能修改程序中的其他部分。最 后把修改后的文件按原文件名存盤(pán)。本題考查對(duì)于 OptionButton 控件的了解 ,OptionButton 控件顯示一個(gè)可以 打開(kāi)或者關(guān)閉的選項(xiàng) ,判斷它是否被選中使用的是 value 屬性,選中為 True, 反之 為 False 。? 一般在使用 OptionButton 控件使大多數(shù)人喜歡使用控件數(shù) 組,在第一題中 SelectCas 語(yǔ)句是根據(jù)表達(dá)式的值，來(lái)決定執(zhí)行幾組語(yǔ)句中的其 中之一。根據(jù)后續(xù)的語(yǔ)句我們可以知道 , 這里需要根據(jù)用戶的選擇進(jìn)行分流 ,

9、分流 的依據(jù)是用戶選擇了那一個(gè) OptionButton, 這個(gè)可以由 Index 得到 ,這里填入 Index, 第二個(gè)空白 , 我們只要知道 OptionButton 數(shù)組從零開(kāi)始 , 不難判斷 Op1 （1）.Caption是"火車(chē)",我們只能"坐",填入a即可。P1中還有2 秒，"開(kāi)第 5 題： ? 在考生文件夾下有一個(gè)工程文件 sjt5.vbp ，窗體上有兩 個(gè)圖片框，名稱(chēng)為？?？ P1、P2,分別用來(lái)表示信號(hào)燈和汽車(chē)，其中在 輪流裝入"黃燈.ico"、"紅燈.ico"、"綠燈.ico

10、"文件來(lái)實(shí)現(xiàn)信號(hào)燈的切換； 兩個(gè)計(jì)時(shí)器 Timer1 和 Timer2， Timer1 用于變換信號(hào)燈，黃燈 1 秒，紅燈 綠燈 3 秒； Timer2 用于控制汽車(chē)向左移動(dòng)。運(yùn)行時(shí)，信號(hào)燈不斷變換，單擊 車(chē)"按鈕后。汽車(chē)開(kāi)始移動(dòng)， 如果移動(dòng)到信號(hào)燈前或信號(hào)燈下， 遇到紅燈或黃燈， 則停止移動(dòng)，當(dāng)變?yōu)榫G燈后再繼續(xù)移動(dòng)。在窗體中已經(jīng)給出了全部控件和程序， 但程序不完整， ? 要求閱讀程序并去掉程序中的注釋符， 把程序中的？改 為正確的內(nèi)容， 使其實(shí)現(xiàn)上述功能， 但不能修改程序中的其他部分， 也不能修改 控件的屬性。 最后把修改后的文件以原文件名存盤(pán)。 ? 本題中涉及三個(gè)事件?

11、點(diǎn)擊開(kāi)車(chē)按鈕 C1_Click, 汽車(chē)開(kāi)始啟動(dòng) , 由題面知道汽車(chē)的開(kāi)動(dòng)由Timer2 控制,那么這里必須啟動(dòng) Timer2, 所以填入 Timer2.Enable=True ? 紅綠燈由 Timer1 控制, 在 Timer1 的事件 Timer1_Timer 中根據(jù)時(shí)間 a 來(lái)更換 P1.Picture 的圖像,達(dá)到紅綠燈轉(zhuǎn)換的效果 ,如果看到其他燈已經(jīng)有了 , 這里填 入"綠燈.ioc"是簡(jiǎn)單的選擇，仔細(xì)分 析要在綠 燈有三秒，也必須這 樣填寫(xiě) ? 最后是汽車(chē)的移動(dòng),已知是由Timer2操作的，在它的事件Timer2_Timer 中要移動(dòng)汽車(chē),使用了 Picture的

12、Move方法,平行向右移動(dòng),改變Left值,這里填 入 picture1.Left 即可實(shí)現(xiàn)。? 其他關(guān)于 Timer 控件以及 picture 控件的 屬性方法事件請(qǐng)自己參閱有關(guān)資料。 ? 第 6 題：?在考生文件名稱(chēng)分別為 Op1 名稱(chēng)分別為 Op3 Text1 。編寫(xiě)適夾下有一個(gè)工程文件sjt5.vbP，請(qǐng)?jiān)诖绑w上畫(huà)兩個(gè)框架，其名稱(chēng)分別為F1和F2, 標(biāo)題分別為"交通工具"和"到達(dá)目標(biāo)"。在F1中畫(huà)兩個(gè)單選按鈕， 和0p2標(biāo)題分別為"飛機(jī)"和"火車(chē)"。在F2中畫(huà)兩個(gè)單選按鈕， 和Op4,標(biāo)題分別為"

13、廣州"和"昆明"。畫(huà)一個(gè)文本框，其名稱(chēng)為當(dāng)事件過(guò)程。程序 運(yùn)行后， 選擇不同 單選按鈕時(shí) 產(chǎn)生的 顯示結(jié)果見(jiàn) 下表 ?程序的運(yùn)行情況如圖所示。存盤(pán)時(shí)，工程文件名為 sjt5.vbp ，窗體文件名為 sjt5.frm 。 ?單選按鈕的 Value 屬性：? Value 屬性用來(lái)表示單選按鈕的狀態(tài)，可以取 True 和 False 兩種值， 取值為T(mén)rue時(shí)，單選按鈕是"打開(kāi)"的,按鈕中心有一個(gè)圓點(diǎn)；取值為False時(shí)， 單選按鈕是"關(guān)閉"的，按鈕是一個(gè)圓圈。？?？ 設(shè)置單選按鈕Value屬性的語(yǔ) 法是：? 單選按鈕名 .Val

14、ue=True （-1）或 False（0）?由于 Value屬性是單選按鈕的缺省屬性，因此在設(shè)置該屬性的值的時(shí)候，可以省略屬性名。? 解題方法： ? 打開(kāi)工程文件 sjt5.vbp ，點(diǎn)擊工具箱中的 Frame 控件圖標(biāo)，然后在窗體上拖拉出兩個(gè)框架，通過(guò)屬性窗口分別設(shè)置其N(xiāo)ame屬性為"F1"和"F2"，Caption屬性為"交通工具"和"到達(dá)目標(biāo)"。? 點(diǎn)擊工具箱 中的 OptionButton 控件圖標(biāo)， 然后在 F1 中拖拉出兩個(gè)單選按鈕， 通過(guò)屬性窗口 分別設(shè)置其 Name屬性為"Op1&quo

15、t;和"Op2"，Caption屬性為"飛機(jī)"和"火車(chē)"。 ?點(diǎn)擊工具箱中的OptionButton控件圖標(biāo)，然后在F2中拖拉出兩個(gè)單選按鈕，通過(guò)屬性窗口分別設(shè)置其 Names性為"Op3"和"Op4"，Caption屬性為"廣 州"和"昆明"。 ? 點(diǎn)擊工具箱中的 TextBox 控件圖標(biāo)，然后在窗體上拖拉 出 一 個(gè) 文 本 框 。? 打 開(kāi) 代 碼 窗 口 ， 輸入 如 下 的 代 碼 ：Te 州 明? PrivateSubForm_Click（ ） ? IfOp1.Value=TrueThen ? IfOp3.Value=TrueThen ? xt1.Text="坐飛機(jī)去廣"? ElseIfOp4.Value=TrueThen ? Text1.Text=" 坐 飛 機(jī) 去"