二、簡(jiǎn)單應(yīng)用題

　　第 1 小題

　　【知識(shí)點(diǎn)播】①某容器(如窗體和框架)中的單選按鈕(OptionButton)組常用于提供多個(gè)選項(xiàng)間的唯一選擇，其 Value 屬性用于設(shè)置或返回每個(gè)單選按鈕的選中狀態(tài)：值為False 時(shí)表示未被選中，值為 True 時(shí)表示被選中，其 Caption 屬性來(lái)設(shè)置或返回單選按鈕的標(biāo)題內(nèi)容。

　　②分支控制結(jié)構(gòu)是結(jié)構(gòu)化程序設(shè)計(jì)的基本結(jié)構(gòu)之一，它所要解決的是根據(jù)條件判斷的結(jié)果決定程序執(zhí)行的流向。選擇控制結(jié)構(gòu)就是其中一種，它是由 2 分支構(gòu)成的，就是說(shuō)，條件要么是真，要么是假，沒(méi)有其他的選擇。在執(zhí)行結(jié)構(gòu)時(shí)按照所指定的條件進(jìn)行判斷并選擇其中一組語(yǔ)句來(lái)執(zhí)行。If 語(yǔ)句就是一種選擇控制結(jié)構(gòu)，其一般語(yǔ)法為：

　　If 條件 Then語(yǔ)句塊A Else

　　語(yǔ)句塊B End If

　　功能：判斷條件，如果條件為"真"，則執(zhí)行語(yǔ)句塊 A 部分，反之則執(zhí)行語(yǔ)句塊 B 部分。

　　【審題分析】根據(jù)題目要求，在本題的程序設(shè)計(jì)上，以 Fra1 中的 Opt1 是否選中作為If?Then?Else 語(yǔ)句的條件，由此分出兩種情況，Opt1 被選中或 Opt2 被選中。在條件為真(即 Opt1 被選中)時(shí)，再使用一個(gè)嵌套的 If?Then?Else 語(yǔ)句對(duì) Fra2 中 Opt3 和 Opt4的選中情況進(jìn)行分類(lèi)，當(dāng) Opt3 被選中時(shí)，文本框中顯示"我是男學(xué)生"，否則顯示"我是女學(xué)生";同理在條件為假(即 Opt2 被選中)時(shí)，也用類(lèi)似方法處理。這樣一共就有四種可能：Opt1 和 Opt3 被選中、Opt1 和 Opt4 被選中、Opt2 和 Opt3 被選中或 Opt2 和 Opt4被選中，對(duì)于可能出現(xiàn)的不同選擇對(duì)照題目中表的規(guī)定，修改 Txt1 的 Text 屬性值，以顯示不同內(nèi)容。以上判斷和顯示操作均在 Cmd1 的 Click 事件中完成。

　　【操作步驟】

　　步驟 1：打開(kāi)考生文件夾下的本題工程文件 vbsj3.vbp。

　　步驟 2：在窗體 Form1 中加入兩個(gè)框架和一個(gè)命令按鈕，然后在每個(gè)框架中各加入兩個(gè)單選按鈕，分別設(shè)置它們的相關(guān)屬性，屬性及其值見(jiàn)表 57-3。

　　步驟 3：打開(kāi)代碼編輯窗口輸入如下代碼：

　　參考代碼：

　　Private Sub Cmd1_Click()

　　If Opt1.Value = True Then

　　If Opt3.Value = True Then

　　Txt1.Text = Opt1.Caption + Opt3.Caption

　　Else

　　Txt1.Text = Opt1.Caption + Opt4.Caption

　　End If

　　Else

　　If Opt3.Value = True Then

　　Txt1.Text = Opt2.Caption + Opt3.Caption

　　Else

　　Txt1.Text = Opt2.Caption + Opt4.Caption

　　End If

　　End If

　　End Sub

　　步驟 4：按要求將文件保存至考生文件夾中。

　　【考試誤區(qū)】在一個(gè)容器中的多個(gè)單選按鈕只能有一個(gè)被選中，由此分出不同分支，理清思路是關(guān)鍵。

　　第 2 小題

　　【審題分析】本題程序設(shè)計(jì)思路：在"計(jì)算"按鈕的單擊事件過(guò)程中，將 For 循環(huán)語(yǔ) 句的循環(huán)變(如變I 的值為 1~30 間的所有整數(shù))的取值逐一除以 7，并將能被 7 整除 的整數(shù)累積入一個(gè)變(如 temp)，判斷整數(shù) A 能被整數(shù) B 整除的條件表達(dá)式為 A Mod B=0。然后將循環(huán)結(jié)束時(shí)變temp 的值顯示在文本框中，并調(diào)用本題源程序所提供標(biāo)準(zhǔn)模塊 model.bas 中的 writedata 過(guò)程，將變temp 的值存入文件 dw2.dat。

　　【操作步驟】

　　步驟 1：新建一個(gè)"標(biāo)準(zhǔn) EXE"工程，按表 57-4 在窗體 Form1 中畫(huà)出控件并設(shè)置其屬性。

　　步驟 2：選擇【工程】?【添加模塊】命令，打開(kāi)添加模塊對(duì)話框，將考生文件夾下的model.bas 添加到當(dāng)前工程中。

　　步驟 3：打開(kāi)代碼編輯窗口，編寫(xiě)"計(jì)算"按鈕的單擊事件過(guò)程。

　　步驟 4：按要求將文件保存至考生文件夾中。

　　【考試誤區(qū)】在調(diào)用過(guò)程保存數(shù)據(jù)時(shí)，一定要根據(jù)過(guò)程的定義正確傳遞參數(shù)。

　　編輯推薦：

　　2014年上半年計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間及入口專(zhuān)題

　　各地2014年計(jì)算機(jī)等級(jí)考試費(fèi)用匯總

　　2014年計(jì)算機(jī)等級(jí)考試時(shí)間