2013年3月計(jì)算機(jī)二級(jí)VB考前沖刺試卷及答案(2)

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

　　(1)為職工表設(shè)計(jì)一個(gè)名為zgb的快速報(bào)表。

　　(2)修改考生文件夾中的“工資查詢(xún).prg”文件，此文件的功能為：

　　通過(guò)結(jié)構(gòu)復(fù)制數(shù)據(jù)表文件“工資表”生成一個(gè)含有職工號(hào)和基本工資的新數(shù)據(jù)表文件gz

　　B.dbf，將原數(shù)據(jù)庫(kù)中基本工資大于1 500的職工記錄添加到新表中并瀏覽結(jié)果。

　　修改程序中的錯(cuò)誤行，不得刪除或添加程序行，使程序正確運(yùn)行。

　　工資表的結(jié)構(gòu)和內(nèi)容如下：

　　職工號(hào) 部門(mén)號(hào) 基本工資 獎(jiǎng)金

　　101001 101 1750 1200

　　101002 101 1000 400

　　102001 102 700 200

　　102002 102 900 350

　　103001 103 1500 600

　　103002 103 1200 400

　　【參考答案】

　　(1)具體步驟如下：

　�、� 在“命令”窗口輸入命令：CREATE REPORT zgb。

　�、� 彈出報(bào)表設(shè)計(jì)器，選擇菜單命令“報(bào)表”→“快速報(bào)表”。

　�、� 系統(tǒng)彈出“打開(kāi)”對(duì)話框，選擇數(shù)據(jù)源表為“職工表”。

　�、� 在“快速報(bào)表”對(duì)話框中單擊“字段布局”左側(cè)的按鈕(此為系統(tǒng)默認(rèn))，選中“標(biāo)題”復(fù)選框，為每一個(gè)字段添加一個(gè)字段名標(biāo)題，再選中“將表添加到數(shù)據(jù)庫(kù)環(huán)境中”復(fù)選框，把“職工表”作為數(shù)據(jù)源表添加到數(shù)據(jù)庫(kù)環(huán)境中，單擊“確定”按鈕，便為職工表建立了一個(gè)快速報(bào)表。

　�、� 單擊工具欄中的“打印預(yù)覽”圖標(biāo)按鈕，查看報(bào)表效果。

　　(2)具體步驟如下： 　www.Examda.CoM

　　① 根據(jù)題意，在“命令”窗口輸入命令：MODI COMM工資查詢(xún).prg。

　�、� 打開(kāi)考生文件夾下的工資查詢(xún).prg文件，查看程序中的錯(cuò)誤行。

　　****工資查詢(xún).prg的源程序內(nèi)容：****

　　SET TALK OFF

　　SET SAFE OFF

　　SELECT 1

　　USE 工資表.dbf

　　COPY STRU TO gz

　　B.dbf 職工號(hào)，基本工資 ****Error****

　　SELECT 2

　　USE gz

　　B.dbf

　　SELECT 1

　　GO TOP

　　DO WHILE ! BOF() ****Error****

　　IF 基本工資>=1500

　　SELECT 2

　　APPEND BLANK

　　REPLACE A->職工號(hào)WITH 職工號(hào)，A->基本工資 WITH 基本工資 &&*error*

　　SELECT 1

　　ENDIF

　　CONT ****Error****

　　ENDDO

　　SELECT 2

　　DISPLAY ALL

　　DELETE TABLE gz

　　B.dbf ****Error****

　　CLOSE DATABASE

　　SET SAFE ON

　　SET TALK ON

　　*************************************

　�、� 修改程序中的錯(cuò)誤。

　　****下面是修改后的工資查詢(xún).prg的程序內(nèi)容：****

　　SET TALK OFF

　　SET SAFE OFF

　　SELECT 1

　　USE 工資表.dbf

　　COPY STRU TO gz

　　B.dbf FIELDS 職工號(hào)，基本工資

　　SELECT 2

　　USE gz

　　B.dbf

　　SELECT 1

　　GO TOP

　　DO WHILE ! EOF()

　　IF 基本工資>=1500

　　SELECT 2

　　APPEND BLANK

　　REPLACE 職工號(hào)WITH A-> 職工號(hào)， 基本工資 WITH A-> 基本工資

　　SELECT 1

　　ENDIF

　　SKIP

　　ENDDO

　　SELECT2

　　DISPLAY ALL

　　DROP TABLE gz

　　B.dbf

　　CLOSE DATABASE

　　SET SAFE ON

　　SET TALK ON

　　***********************************

　　④ 在“命令”窗口輸入：DO 工資查詢(xún).prg，運(yùn)行程序。

　　【試題解析】

　　本試題主要考查了快速報(bào)表的建立和SQL語(yǔ)句的簡(jiǎn)單應(yīng)用。在(1)小題中可以通過(guò)菜單命令建立一個(gè)快速報(bào)表文件。

　　三、綜合應(yīng)用題

　　按如下要求完成綜合應(yīng)用(所有控件的屬性必須在表單設(shè)計(jì)器的屬性窗口中設(shè)置)：

　　(1)根據(jù)“項(xiàng)目信息”、“零件信息”和“使用零件”三個(gè)表建立一個(gè)查詢(xún)(注意表之間的連接字段)，該查詢(xún)包含項(xiàng)目號(hào)、項(xiàng)目名、零件名稱(chēng)和(使用)數(shù)量四個(gè)字段，并要求先按項(xiàng)目號(hào)升序排序、再按零件名稱(chēng)降序排序，保存的查詢(xún)文件名為chaxun;

　　(2)建立一個(gè)表單，表單名和文件名均為myform，表單中含有一個(gè)表格控件Grid1，該表格控件的數(shù)據(jù)源是前面建立的查詢(xún)chaxun;然后在表格控件下面添加一個(gè)“退出”命令按鈕Command1，要求命令按鈕與表格控件左對(duì)齊、并且寬度相同，單擊該按鈕時(shí)關(guān)閉表單。

　　【參考答案】

　　(1)具體步驟如下：

　�、� 從“文件”菜單中選擇“新建”命令，在彈出的“新建”對(duì)話框中選中“查詢(xún)”單選按鈕，單擊“新建文件”按鈕。

　　② 在彈出的“打開(kāi)”對(duì)話框中選擇打開(kāi)“零件信息”表。

　�、� 系統(tǒng)打開(kāi)“查詢(xún)?cè)O(shè)計(jì)器”窗口，同時(shí)打開(kāi)“添加表或視圖”對(duì)話框，單擊“其他”按鈕添加“使用零件”、“項(xiàng)目信息”兩個(gè)表，單擊“關(guān)閉”按鈕關(guān)閉對(duì)話框。

　�、� 在“字段”選項(xiàng)卡中的“可用字段”列表框中選擇“項(xiàng)目信息.項(xiàng)目號(hào)”字段，單擊“添加”按鈕將其添加到“選定字段”列表框中，以同樣的方法添加“項(xiàng)目信息.項(xiàng)目名”、“零件信息.零件名稱(chēng)”、“使用零件.數(shù)量”三個(gè)字段。

　�、� 在“排序依據(jù)”選項(xiàng)卡中的“選定字段”列表框中選擇“項(xiàng)目信息.項(xiàng)目號(hào)”字段，單擊“添加”按鈕將其添加到“排序條件”列表框中，并選中“升序”單選按鈕。

　�、� 在“選定字段”列表框中選擇“零件信息.零件名稱(chēng)”字段，單擊“添加”按鈕將其添加到“排序條件”列表框中，并選中“降序”單選按鈕，

　　⑦ 單擊工具欄中的“保存”按鈕，在彈出的“另存為”對(duì)話框中以chaxun為文件名保存。

　　(2)具體步驟如下：

　　① 從文件”菜單中選擇“新建”命令，在彈出的“新建”對(duì)話框中選中“表單”單選按鈕，單擊“新建文件”按鈕，系統(tǒng)打開(kāi)“表單設(shè)計(jì)器”窗口。

　�、� 在“屬性”窗口中設(shè)置表單的Name屬性為myform。

　�、� 在“控件”工具欄中單擊“表格”按鈕，單擊表單工作區(qū)域即可添加一個(gè)表格。

　�、� 在“屬性”窗口中為表格設(shè)置如下屬性：

　　RecordSourceType=“3-查詢(xún)(.QPR)”

　　RecordSource=“chaxun”

　�、� 在表格的下方添加一個(gè)命令按鈕，在“屬性”窗口中修改按鈕的Caption屬性值為“退出”。

　�、� 在表單中選中表格，在“屬性”窗口中查看表格的寬度并記下。

　�、� 在表單中選中命令按鈕，然后在“屬性”窗口中將其寬度改為和表格一樣的寬度。

　�、� 在表單中選中命令按鈕，在“屬性”窗口中雙擊Click事件，在彈出的窗口中添加如下代碼：

　　THISFORM.RELEASE

　�、� 單擊工具欄中的“保存”按鈕，在彈出的對(duì)話框中以myform為文件名保存。