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

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

2、一個是循環(huán), 一個是文件的訪問。由于在小于18000中尋找最大素?cái)?shù), 并且判斷素?cái)?shù)的函數(shù)已經(jīng)給出, 只要使用一個循環(huán)在18000以下尋找, 沒有找到減一再尋找, 找到記錄在Text1.Text 中, 在結(jié)構(gòu)化的程序中不再提倡GoTo 以及從結(jié)構(gòu)體中退出（例如Exit For等）, 使用While 判斷是一個較好的選擇。第2題：在考生文件夾下有一個工程文件sjt4.vbp ，窗體上已經(jīng)有兩個文本框，名 稱分別為Text1、Text2；和一個命令按鈕，名稱為C1，標(biāo)題為 確定 ； 請畫兩個單選按鈕，名稱分別為 Op1、Op2，標(biāo)題分別為 男生 、 女 生 ；再畫兩個復(fù)選框，名稱分別為 Ch1、 C

3、h2，標(biāo)題分別為 體育 、 音樂 。請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時，單擊 確定 按鈕后實(shí) 現(xiàn)下面的要求：1）根據(jù)選中的單選按鈕，在Text1中顯示 我是男生 或 我是女生 。2）根據(jù)選中的復(fù)選框，在Text2中顯示 我的愛好是體育 或 我的愛好是 音樂 或 我的愛好是體育音樂 。如圖所示。注意： 不得修改已經(jīng)給出的程序和已有控件的屬性。在結(jié)束程序運(yùn)行之前，必 須選中一個單選按鈕和至少一個復(fù)選框，并單擊 確定 按鈕。必須使用 窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。分析：單選按鈕OptionButton 和選擇框CheckBox 的簡單應(yīng)用OptionButton 控件和CheckBox

4、控件功能相似，但是二者間也存在著重要差別。在選擇一個OptionButton 時，同組中的其它OptionButton 控件自動無效。相反，可以選擇任意數(shù)量的CheckBox 控件。只要注意了這一點(diǎn)本題可以在C1_Click事件中判斷他們的選中情況OptionButton 的value 為True 表示選中,CheckBox 的value=1時表示選中。第3題：在名稱為 Form1 的窗體上畫一個標(biāo)簽，名稱為 L1，標(biāo)簽上顯示 請輸入 密碼 ， 在標(biāo)簽的右邊畫一個文本框，名稱為 Text1 ，其寬、高分別為 2000和300，設(shè)置適當(dāng)?shù)膶傩允沟迷谳斎朊艽a時，文本框中顯示*字符， 此外再把窗體的

5、標(biāo)題設(shè)置為 密碼窗口 ，以上這些設(shè)置都只能在屬性窗 口中進(jìn)行設(shè)置，運(yùn)行時的窗體如圖所示。 *注意： 存盤時必須存放在考生文件夾下，工程文件名為 sjt1.vbp ，窗體文件 名為sjt1.frm 。分析：創(chuàng)建的對象設(shè)置屬性。屬性窗口（選中對按F4調(diào)出）給出了設(shè)置所有的窗體對象屬性的簡便方法。在 視圖 菜單中選擇 屬性窗口 命令、單擊工具欄上的 屬性窗口 按鈕或使用控件的上下文菜單，都可以打開屬性窗口。在本題中要求對于密碼框的設(shè)定, 只要為Text1的PasswordChar 屬性設(shè)置為*即可完成第4題：在考生文件夾下有一個工程文件 sjt3.vbp ，窗體上已經(jīng)有一個標(biāo)簽 L1， 請畫一個單選

6、按鈕數(shù)組，名稱為Op1， 含三個單選按鈕，它們的Index 屬性 分別為0、1、2，標(biāo)題依次為 飛機(jī) 、 火車 、 汽車 ，再畫一個名 稱為Text1的文本框。窗體文件中已經(jīng)給出了Op1的Click 事件過程，但不完 整，要求去掉程序中的注釋符，把程序中的 ？改為正確的內(nèi)容，使得在運(yùn) 行時單擊 飛機(jī) 或 火車 單選按鈕時，在Text1中顯示 我坐飛機(jī)去 或 我坐火車去 ，單擊 汽車 單選按鈕時，在Text1中顯示 我開汽車 去 ，如圖所示。 注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。本題考查對于OptionButton 控件的了解,OptionButton 控件顯示一個

7、可以打開或者關(guān)閉的選項(xiàng), 判斷它是否被選中使用的是value 屬性, 選中為True, 反之為False 。一般在使用OptionButton 控件使大多數(shù)人喜歡使用控件數(shù)組, 在第一題中Select Cas 語句是根據(jù)表達(dá)式的值，來決定執(zhí)行幾組語句中的其中之一。根據(jù)后續(xù)的語句我們可以知道, 這里需要根據(jù)用戶的選擇進(jìn)行分流, 分流的依據(jù)是用戶選擇了那一個OptionButton, 這個可以由Index 得到, 這里填入Index, 第二個空白, 我們只要知道OptionButton 數(shù)組從零開始, 不難判斷Op1（1.Caption 是 火車, 我們只能 坐, 填入a 即可。第5題：在考生文件

8、夾下有一個工程文件sjt5.vbp ，窗體上有兩個圖片框，名稱為P1、P2，分別用來表示信號燈和汽車，其中在 P1 中輪流裝入 黃燈.ico 、 紅燈.ico 、 綠燈.ico 文件來實(shí)現(xiàn)信號燈的切換；還有兩個計(jì)時器Timer1 和Timer2，Timer1用于變換信號燈，黃燈1秒，紅燈2秒，綠燈3秒；Timer2用于 控制汽車向左移動。運(yùn)行時，信號燈不斷變換，單擊 開車 按鈕后。 汽車開 始移動，如果移動到信號燈前或信號燈下，遇到紅燈或黃燈，則停止移動， 當(dāng) 變?yōu)榫G燈后再繼續(xù)移動。在窗體中已經(jīng)給出了全部控件和程序，但程序不完整，要求閱讀程序并去掉程序中的注釋符，把程序中的 ？改為正確的內(nèi)容，

9、使其實(shí) 現(xiàn)上述功能，但不能修改程序中的其他部分，也不能修改控件的屬性。 最后把 修改后的文件以原文件名存盤。本題中涉及三個事件點(diǎn)擊開車按鈕C1_Click,汽車開始啟動, 由題面知道汽車的開動由Timer2控制, 那么這里必須啟動Timer2, 所以填入Timer2.Enable=True紅綠燈由Timer1控制, 在Timer1的事件Timer1_Timer中根據(jù)時間a 來更換P1.Picture 的圖像, 達(dá)到紅綠燈轉(zhuǎn)換的效果, 如果看到其他燈已經(jīng)有了, 這里填入 綠燈.ioc 是簡單的選擇, 仔細(xì)分析要在綠燈有三秒, 也必須這樣填寫最后是汽車的移動, 已知是由Timer2操作的, 在它的

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

11、當(dāng)事件過程。程序運(yùn)行后， 選擇不同單選按鈕時產(chǎn)生的顯示結(jié)果見下表程序的運(yùn)行情況如圖所示。存盤時，工程文件名為sjt5.vbp ，窗體文件名 為sjt5.frm 。單選按鈕的value 屬性：value 屬性用來表示單選按鈕的狀態(tài)，可以取True 和False 兩種值，取值為True 時，單選按鈕是 打開 的，按鈕中心有一個圓點(diǎn)；取值為False 時，單選按鈕是 關(guān)閉 的，按鈕是一個圓圈。設(shè)置單選按鈕value 屬性的語法是：單選按鈕名.value = True（-1 或False （0由于value 屬性是單選按鈕的缺省屬性，因此在設(shè)置該屬性的值的時候，可以省略屬性名。 解題方法：打開工程文件

12、sjt5.vbp ，點(diǎn)擊工具箱中的Frame 控件圖標(biāo)，然后在窗體上拖拉出兩個框架，通過屬性窗口分別設(shè)置其Name 屬性為F1 和F2 ，Caption 屬性為 交通工具 和 到達(dá)目標(biāo) 。 點(diǎn)擊工具箱中的OptionButton 控件圖標(biāo)，然后在F1中拖拉出兩個單選按鈕，通過屬性窗口分別設(shè)置其Name 屬性為Op1 和Op2 ，Caption 屬性為 飛機(jī) 和 火車 。點(diǎn)擊工具箱中的OptionButton 控件圖標(biāo)，然后在F2中拖拉出兩個單選按鈕，通過屬性窗口分別設(shè)置其Name 屬性為Op3 和Op4 ，Caption 屬性為 廣州 和 昆明 。點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在

13、窗體上拖拉出一個文本框。打開代碼窗口，輸入如下的代碼：Private Sub Form_Click（If Op1.value = True ThenIf Op3.value = True ThenText1.Text = 坐飛機(jī)去廣州ElseIf Op4.value = True ThenText1.Text = 坐飛機(jī)去昆明End IfElseIf Op2.value = True ThenIf Op3.value = True ThenText1.Text = 坐火車去廣州ElseIf Op4.value = True ThenText1.Text = 坐火車去昆明End IfEnd If

14、End Sub第7題：在考生文件夾下有一個工程文件sjt6.vbp ，請?jiān)诖绑w上畫三個文本框，其 名稱分別為Text1、Text2和Text3，文本框內(nèi)容分別設(shè)置為 等級考試 、 計(jì)算機(jī) 和空白。然后畫兩個單選按鈕，其名稱分別為Op1和Op2，標(biāo)題 分別為 交換 和 連接 （如圖所示），編寫適當(dāng)?shù)氖录绦?。程序運(yùn) 行后，如果選中 交換 單選按鈕并單擊Text3文本框，則Text1文本框中 內(nèi)容與Text2文本框中內(nèi)容進(jìn)行交換，并在Text3文本框中顯示 交換成 功 ；如果選中 連接 單選按鈕并單擊 Text3 文本框，則把 Text1 和 Text2的內(nèi)容按Text1、Text2的順序連接起來

15、，并在Text3文本框中顯示連 接后的內(nèi)容。存盤時，工程文件名為sjt6.vbp ，窗體文件名為sjt6.frm 。解題方法：打開工程文件sjt6.vbp ，點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在窗體上拖拉出三個文本框，通過屬性窗口分別設(shè)置其Text 屬性為 等級考試 、 計(jì)算機(jī) 和 。點(diǎn)擊工具箱中的OptionButton 控件圖標(biāo)，然后在窗體中拖拉出兩個單選按鈕，通過屬性窗口分別設(shè)置其Name 屬性為Op1 和Op2 ，Caption 屬性為 交換 和 連接 。打開代碼窗口，輸入如下的代碼：Private Sub Text3_Click(If Op1.value ThenText1

16、.Text = 計(jì)算機(jī)Text2.Text = 等級考試Text3.Text = 交換成功ElseText3.Text = Text1.Text + Text2.TextEnd IfEnd Sub第8題：在Form1的窗體上畫一個文本框，其名稱為Text1；再畫兩個命令按鈕，其名稱分別為C1和C2，標(biāo)題分別為 顯示 和 退出 ，編寫適當(dāng)?shù)氖录?過程。程序運(yùn)行后，在窗體加載時使 退出 按鈕不可用，如果單擊 顯 示 按鈕，則在文本框中顯示 等級考試 ，并使 退出 按鈕可用，此 時如果單擊 退出 按鈕，則結(jié)束程序，程序運(yùn)行情況如圖所示。解題方法：新建一個名為Form1的窗體，點(diǎn)擊工具箱中的Comma

17、ndButton 控件圖標(biāo)，然后在窗體上拖拉出兩個命令按鈕，通過屬性窗口分別設(shè)置其Name 屬性為C1 和C2,Caption 屬性為 顯示 和 退出 。點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在窗體上拖拉出一個文本框。打開代碼窗口，輸入如下的代碼：Private Sub C1_Click（C2.Enabled = TrueText1.Text = 等級考試End SubPrivate Sub C2_Click（EndEnd Sub第9題：在Form1的窗體上畫一個命令按鈕，其名稱為C1，標(biāo)題為 顯示 ；再畫一個文本框，其名稱為Text1，編寫適當(dāng)?shù)氖录^程。程序運(yùn)行后，在窗 體加載時使文

18、本框不可見，如果雙擊窗體，則文本框出現(xiàn)；此時如果單擊 命令按鈕，則在文本框中顯示 等級考試 。程序運(yùn)行情況如圖所示。解題方法：新建一個名為Form1的窗體，點(diǎn)擊工具箱中的CommandButton 控件圖標(biāo)，然后在窗體上拖拉出一個命令按鈕，通過屬性窗口設(shè)置其Name 屬性為C1 ，Caption 屬性為 顯示 。 點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在窗體上拖拉出一個文本框。打開代碼窗口，輸入如下的代碼：Private Sub C1_Click（Text1.Text = 等級考試End SubPrivate Sub Form_DblClick（Text1.V isible = True

19、End SubPrivate Sub Form_Load（Text1.V isible = FalseEnd Sub第10題：在窗體上畫一個文本框，其名稱為Text1，Text 屬性為空白。再畫一個命 令按鈕，其名稱為C1，Visible 屬性為False 。編寫適當(dāng)?shù)氖录^程。程序 運(yùn)行后，如果在文本框中輸入字符，則命令按鈕出現(xiàn)。程序運(yùn)行情況如圖 所示。解題方法：新建一個窗體，點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在窗體上拖拉出一個文本框，通過屬性窗口設(shè)置其Text 屬性為 。點(diǎn)擊工具箱中的CommandButton 控件圖標(biāo)，然后在窗體上拖拉出一個命令按鈕，通過屬性窗口設(shè)置其Name

20、 屬性為C1,Visible 屬性為False 。打開代碼窗口，輸入如下的代碼：Private Sub Text1_Change（C1.Visible = TrueEnd Sub按要求保存文件即完成本題。 （本文已被瀏覽 2222 次）全國計(jì)算機(jī)等級考試二級VB 上機(jī)試題1第1題：在考生文件夾下有一個工程文件sjt5.vbp ，其窗體上有一個文本框，名稱 為Text1；還有兩個命令按鈕，名稱分別為C1、C2，標(biāo)題分別為 計(jì)算 、 存盤 ，如圖所示。并有一個函數(shù)過程 isprime 可以在程序中直接調(diào)用， 其功能是判斷參數(shù) a 是否為素?cái)?shù)，如果是素?cái)?shù)，則返回 True ，否則返回 False 。

21、 請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時，單擊 計(jì)算 按鈕，則找出小于 18000的最大的素?cái)?shù)，并顯示在Text1中；單擊 存盤 按鈕，則把 Text1 中的計(jì)算結(jié)果存入考生文件夾下的out5.txt 文件中。本題的考查主要有兩個, 一個是循環(huán), 一個是文件的訪問。由于在小于18000中尋找最大素?cái)?shù), 并且判斷素?cái)?shù)的函數(shù)已經(jīng)給出, 只要使用一個循環(huán)在18000以下尋找, 沒有找到減一再尋找, 找到記錄在Text1.Text 中, 在結(jié)構(gòu)化的程序中不再提倡GoTo 以及從結(jié)構(gòu)體中退出（例如Exit For等）, 使用While 判斷是一個較好的選擇。第2題：在考生文件夾下有一個工程文件sjt4.vb

22、p ，窗體上已經(jīng)有兩個文本框，名 稱分別為Text1、Text2；和一個命令按鈕，名稱為C1，標(biāo)題為 確定 ； 請畫兩個單選按鈕，名稱分別為 Op1、Op2，標(biāo)題分別為 男生 、 女 生 ；再畫兩個復(fù)選框，名稱分別為 Ch1、 Ch2，標(biāo)題分別為 體育 、 音樂 。請編寫適當(dāng)?shù)氖录^程，使得在運(yùn)行時，單擊 確定 按鈕后實(shí) 現(xiàn)下面的要求：1）根據(jù)選中的單選按鈕，在Text1中顯示 我是男生 或 我是女生 。2）根據(jù)選中的復(fù)選框，在Text2中顯示 我的愛好是體育 或 我的愛好是 音樂 或 我的愛好是體育音樂 。如圖所示。注意： 不得修改已經(jīng)給出的程序和已有控件的屬性。在結(jié)束程序運(yùn)行之前，必 須選

23、中一個單選按鈕和至少一個復(fù)選框，并單擊 確定 按鈕。必須使用 窗體右上角的關(guān)閉按鈕結(jié)束程序，否則無成績。分析：單選按鈕OptionButton 和選擇框CheckBox 的簡單應(yīng)用OptionButton 控件和CheckBox 控件功能相似，但是二者間也存在著重要差別。在選擇一個OptionButton 時，同組中的其它OptionButton 控件自動無效。相反，可以選擇任意數(shù)量的CheckBox 控件。 只要注意了這一點(diǎn)本題可以在C1_Click事件中判斷他們的選中情況OptionButton 的V alue 為True 表示選中,CheckBox 的V alue=1時表示選中。第3題：

24、在名稱為 Form1 的窗體上畫一個標(biāo)簽，名稱為 L1，標(biāo)簽上顯示 請輸入 密碼 ， 在標(biāo)簽的右邊畫一個文本框，名稱為 Text1 ，其寬、高分別為 2000和300，設(shè)置適當(dāng)?shù)膶傩允沟迷谳斎朊艽a時，文本框中顯示*字符， 此外再把窗體的標(biāo)題設(shè)置為 密碼窗口 ，以上這些設(shè)置都只能在屬性窗 口中進(jìn)行設(shè)置，運(yùn)行時的窗體如圖所示。 *注意： 存盤時必須存放在考生文件夾下，工程文件名為 sjt1.vbp ，窗體文件 名為sjt1.frm 。分析：創(chuàng)建的對象設(shè)置屬性。屬性窗口（選中對按F4調(diào)出）給出了設(shè)置所有的窗體對象屬性的簡便方法。在 視圖 菜單中選擇 屬性窗口 命令、單擊工具欄上的 屬性窗口 按鈕或使

25、用控件的上下文菜單，都可以打開屬性窗口。在本題中要求對于密碼框的設(shè)定, 只要為Text1的PasswordChar 屬性設(shè)置為*即可完成第4題：在考生文件夾下有一個工程文件 sjt3.vbp ，窗體上已經(jīng)有一個標(biāo)簽 L1， 請畫一個單選按鈕數(shù)組，名稱為Op1， 含三個單選按鈕，它們的Index 屬性 分別為0、1、2，標(biāo)題依次為 飛機(jī) 、 火車 、 汽車 ，再畫一個名 稱為Text1的文本框。窗體文件中已經(jīng)給出了Op1的Click 事件過程，但不完 整，要求去掉程序中的注釋符，把程序中的 ？改為正確的內(nèi)容，使得在運(yùn) 行時單擊 飛機(jī) 或 火車 單選按鈕時，在Text1中顯示 我坐飛機(jī)去 或 我坐

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

27、onButton, 這個可以由Index 得到, 這里填入Index, 第二個空白, 我們只要知道OptionButton 數(shù)組從零開始, 不難判斷Op1（1.Caption 是 火車, 我們只能 坐, 填入a 即可。第5題：在考生文件夾下有一個工程文件sjt5.vbp ，窗體上有兩個圖片框，名稱為P1、P2，分別用來表示信號燈和汽車，其中在 P1 中輪流裝入 黃燈.ico 、 紅燈.ico 、 綠燈.ico 文件來實(shí)現(xiàn)信號燈的切換；還有兩個計(jì)時器Timer1 和Timer2，Timer1用于變換信號燈，黃燈1秒，紅燈2秒，綠燈3秒；Timer2用于 控制汽車向左移動。運(yùn)行時，信號燈不斷變換，

28、單擊 開車 按鈕后。 汽車開 始移動，如果移動到信號燈前或信號燈下，遇到紅燈或黃燈，則停止移動， 當(dāng) 變?yōu)榫G燈后再繼續(xù)移動。在窗體中已經(jīng)給出了全部控件和程序，但程序不完整，要求閱讀程序并去掉程序中的注釋符，把程序中的 ？改為正確的內(nèi)容，使其實(shí) 現(xiàn)上述功能，但不能修改程序中的其他部分，也不能修改控件的屬性。 最后把 修改后的文件以原文件名存盤。本題中涉及三個事件點(diǎn)擊開車按鈕C1_Click,汽車開始啟動, 由題面知道汽車的開動由Timer2控制, 那么這里必須啟動Timer2, 所以填入Timer2.Enable=True紅綠燈由Timer1控制, 在Timer1的事件Timer1_Timer中

29、根據(jù)時間a 來更換P1.Picture 的圖像, 達(dá)到紅綠燈轉(zhuǎn)換的效果, 如果看到其他燈已經(jīng)有了, 這里填入 綠燈.ioc 是簡單的選擇, 仔細(xì)分析要在綠燈有三秒, 也必須這樣填寫最后是汽車的移動, 已知是由Timer2操作的, 在它的事件Timer2_Timer中要移動汽車, 使用了picture 的Move 方法, 平行向右移動, 改變Left 值, 這里填入picture1.Left 即可實(shí)現(xiàn)。 其他關(guān)于Timer 控件以及picture 控件的屬性方法事件請自己參閱有關(guān)資料。第6題：在考生文件夾下有一個工程文件sjt5.vbp ，請?jiān)诖绑w上畫兩個框架，其名 稱分別為F1和F2，標(biāo)題分別

30、為 交通工具 和 到達(dá)目標(biāo) 。在F1中畫兩 個單選按鈕，名稱分別為Op1和Op2，標(biāo)題分別為 飛機(jī) 和 火車 。在 F2中畫兩個單選按鈕，名稱分別為Op3和Op4，標(biāo)題分別為 廣州 和 昆 明 。畫一個文本框，其名稱為Text1。編寫適當(dāng)事件過程。程序運(yùn)行后， 選擇不同單選按鈕時產(chǎn)生的顯示結(jié)果見下表程序的運(yùn)行情況如圖所示。存盤時，工程文件名為sjt5.vbp ，窗體文件名 為sjt5.frm 。單選按鈕的V alue 屬性：V alue 屬性用來表示單選按鈕的狀態(tài)，可以取True 和False 兩種值，取值為True 時，單選按鈕是 打開 的，按鈕中心有一個圓點(diǎn)；取值為False 時，單選按鈕

31、是 關(guān)閉 的，按鈕是一個圓圈。設(shè)置單選按鈕V alue 屬性的語法是：單選按鈕名.V alue = True（-1 或False （0由于V alue 屬性是單選按鈕的缺省屬性，因此在設(shè)置該屬性的值的時候，可以省略屬性名。解題方法：打開工程文件sjt5.vbp ，點(diǎn)擊工具箱中的Frame 控件圖標(biāo)，然后在窗體上拖拉出兩個框架，通過屬性窗口分別設(shè)置其Name 屬性為F1 和F2 ，Caption 屬性為 交通工具 和 到達(dá)目標(biāo) 。點(diǎn)擊工具箱中的OptionButton 控件圖標(biāo)，然后在F1中拖拉出兩個單選按鈕，通過屬性窗口分別設(shè)置其Name 屬性為Op1 和Op2 ，Caption 屬性為 飛機(jī)

32、 和 火車 。點(diǎn)擊工具箱中的OptionButton 控件圖標(biāo)，然后在F2中拖拉出兩個單選按鈕，通過屬性窗口分別設(shè)置其Name 屬性為Op3 和Op4 ，Caption 屬性為 廣州 和 昆明 。點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在窗體上拖拉出一個文本框。打開代碼窗口，輸入如下的代碼：Private Sub Form_Click（If Op1.Value = True ThenIf Op3.Value = True ThenText1.Text = 坐飛機(jī)去廣州ElseIf Op4.Value = True ThenText1.Text = 坐飛機(jī)去昆明End IfElseIf Op

33、2.Value = True ThenIf Op3.Value = True ThenText1.Text = 坐火車去廣州ElseIf Op4.Value = True ThenText1.Text = 坐火車去昆明End IfEnd IfEnd Sub第7題：在考生文件夾下有一個工程文件sjt6.vbp ，請?jiān)诖绑w上畫三個文本框，其 名稱分別為Text1、Text2和Text3，文本框內(nèi)容分別設(shè)置為 等級考試 、 計(jì)算機(jī) 和空白。然后畫兩個單選按鈕，其名稱分別為Op1和Op2，標(biāo)題 分別為 交換 和 連接 （如圖所示），編寫適當(dāng)?shù)氖录绦?。程序運(yùn) 行后，如果選中 交換 單選按鈕并單擊Tex

34、t3文本框，則Text1文本框中 內(nèi)容與Text2文本框中內(nèi)容進(jìn)行交換，并在Text3文本框中顯示 交換成 功 ；如果選中 連接 單選按鈕并單擊 Text3 文本框，則把 Text1 和 Text2的內(nèi)容按Text1、Text2的順序連接起來，并在Text3文本框中顯示連 接后的內(nèi)容。存盤時，工程文件名為sjt6.vbp ，窗體文件名為sjt6.frm 。解題方法：打開工程文件sjt6.vbp ，點(diǎn)擊工具箱中的TextBox 控件圖標(biāo)，然后在窗體上拖拉出三個文本框，通過屬性窗口分別設(shè)置其Text 屬性為 等級考試 、 計(jì)算機(jī) 和 。點(diǎn)擊工具箱中的OptionButton 控件圖標(biāo)，然后在窗體中拖拉出兩個單選按鈕，通過屬性窗口分別設(shè)置其Name 屬性為Op1 和Op2 ，Caption 屬性為 交換 和 連接 。打開代碼窗口，輸入如下的代碼：Private Sub Text3_Click(If Op1.Value ThenText1.Text = 計(jì)算機(jī)Text2.Text = 等級考試Text3.Text = 交換成功ElseText3.Text = Text1.Text + Text2.TextEnd IfEnd Sub第8題：在Form1的窗體上畫一個文本框，其名稱為Text1；再畫兩個命令按鈕，其名稱分別為C1和C2