計(jì)算機(jī)二級(jí)vf無(wú)憂題庫(kù)第19道

1、1一、基本操作題（共一、基本操作題（共4小題，第小題，第1和和2題是題是7分、第分、第3和和4題是題是8分）分） 在考生文件夾下，完成如下操作：在考生文件夾下，完成如下操作： 1. 打開考生文件夾下的表單打開考生文件夾下的表單one（如圖所示），在（如圖所示），在顯示顯示命令按鈕的命令按鈕的Click事件中事件中增加一條語(yǔ)句，使表單運(yùn)行時(shí)單擊該命令按鈕的結(jié)果是在增加一條語(yǔ)句，使表單運(yùn)行時(shí)單擊該命令按鈕的結(jié)果是在Text1文本框中顯示當(dāng)前文本框中顯示當(dāng)前系統(tǒng)日期的年份。（提示：通過(guò)設(shè)置文本框的系統(tǒng)日期的年份。（提示：通過(guò)設(shè)置文本框的Value屬性實(shí)現(xiàn)，系統(tǒng)日期函數(shù)是屬性實(shí)現(xiàn)，系統(tǒng)日期函數(shù)是dat

2、e，年份函數(shù)是，年份函數(shù)是year）。）。 2. 打開考生文件夾下的表單打開考生文件夾下的表單two（如圖所示），選擇（如圖所示），選擇表單表單菜單中的菜單中的新建方法新建方法程序程序命令，在命令，在新建方法程序新建方法程序?qū)υ捒蛑?，為該表單新建一個(gè)方法對(duì)話框中，為該表單新建一個(gè)方法test，該方法的功，該方法的功能是使能是使測(cè)試測(cè)試按鈕變?yōu)椴豢捎谩＃ㄌ崾荆杭磳⒃摪粹o的按鈕變?yōu)椴豢捎谩＃ㄌ崾荆杭磳⒃摪粹o的Enabled屬性設(shè)置為屬性設(shè)置為.f.）（）（測(cè)試測(cè)試按鈕的按鈕的Click事件中已經(jīng)有一條語(yǔ)句負(fù)責(zé)調(diào)用事件中已經(jīng)有一條語(yǔ)句負(fù)責(zé)調(diào)用test方法）。方法）。 3. 創(chuàng)建一個(gè)快速報(bào)表創(chuàng)建一個(gè)快

3、速報(bào)表study_report，報(bào)表中包含，報(bào)表中包含課程表課程表中的所有字段。中的所有字段。 4. 使用使用SQL語(yǔ)句為語(yǔ)句為教師表教師表的的職工號(hào)職工號(hào)字段增加有效性規(guī)則：職工號(hào)的最左邊三字段增加有效性規(guī)則：職工號(hào)的最左邊三位字符是位字符是110，表達(dá)式應(yīng)為：，表達(dá)式應(yīng)為：LEFT(職工號(hào)職工號(hào),3)=110。請(qǐng)將該。請(qǐng)將該SQL語(yǔ)句存儲(chǔ)在語(yǔ)句存儲(chǔ)在three.prg文件中，否則不得分。文件中，否則不得分。2 本題的主要考核點(diǎn)是建立表單方法及方法調(diào)用、表單控件代碼、快速報(bào)表的建立、本題的主要考核點(diǎn)是建立表單方法及方法調(diào)用、表單控件代碼、快速報(bào)表的建立、SQL語(yǔ)句的應(yīng)用。語(yǔ)句的應(yīng)用。 1.利

4、用利用文件文件菜單下的菜單下的打開打開命令來(lái)打開表單命令來(lái)打開表單one，或使用命令，或使用命令MODIFY FORM one。在。在顯示顯示命令按鈕的命令按鈕的Click事件中輸入代碼：事件中輸入代碼：thisform.text1.value=year(date() 2.利用利用文件文件菜單下的菜單下的打開打開命令來(lái)打開表單命令來(lái)打開表單two，或使用命令，或使用命令MODIFY FORM two。在。在表單表單菜單中選擇菜單中選擇新建方法程序新建方法程序命令，新建一個(gè)名為命令，新建一個(gè)名為test的方法，在屬的方法，在屬性窗口中雙擊此方法打開用戶自定義過(guò)程代碼：性窗口中雙擊此方法打開用戶自

5、定義過(guò)程代碼：mand1.enabled=.f. 3. 通過(guò)通過(guò)文件文件菜單下的菜單下的新建新建命令打開報(bào)表設(shè)計(jì)器，利用命令打開報(bào)表設(shè)計(jì)器，利用報(bào)表報(bào)表菜單下的菜單下的快速快速報(bào)表報(bào)表命令創(chuàng)建快速報(bào)表命令創(chuàng)建快速報(bào)表study_report。 4.使用使用SQL語(yǔ)句設(shè)置表字段有效性規(guī)則的命令是：語(yǔ)句設(shè)置表字段有效性規(guī)則的命令是：alter table 教師表教師表 alter 職工職工號(hào)號(hào) set check LEFT(職工號(hào)職工號(hào),3)=110，然后將此命令保存在，然后將此命令保存在three.prg文件中。文件中。3二、簡(jiǎn)單應(yīng)用（二、簡(jiǎn)單應(yīng)用（2小題，每題小題，每題20分，計(jì)分，計(jì)40分）

6、分） 在考生文件夾下完成如下簡(jiǎn)單應(yīng)用：在考生文件夾下完成如下簡(jiǎn)單應(yīng)用： 1. 打開數(shù)據(jù)庫(kù)文件打開數(shù)據(jù)庫(kù)文件課程管理課程管理，使用，使用SQL語(yǔ)句建立一個(gè)視圖語(yǔ)句建立一個(gè)視圖salary，該視圖包括了系號(hào)和（該系的）平均工資兩個(gè)字段，該視圖包括了系號(hào)和（該系的）平均工資兩個(gè)字段，并且按平均工資降序排列。請(qǐng)將該并且按平均工資降序排列。請(qǐng)將該SQL語(yǔ)句存儲(chǔ)在語(yǔ)句存儲(chǔ)在four.prg文文件中，否則不得分。件中，否則不得分。 2. 打開考生文件夾下的表單打開考生文件夾下的表單six（如圖所示），（如圖所示），登錄登錄命令命令按鈕按鈕Click事件中的程序功能是：當(dāng)用戶輸入用戶名和口令以后，事件中的程序

7、功能是：當(dāng)用戶輸入用戶名和口令以后，單擊單擊登錄登錄按鈕時(shí)，程序根據(jù)自由表按鈕時(shí)，程序根據(jù)自由表用戶表用戶表的內(nèi)容進(jìn)行操作，的內(nèi)容進(jìn)行操作，若在若在用戶表用戶表中找不到相應(yīng)的用戶名，則提示中找不到相應(yīng)的用戶名，則提示用戶名錯(cuò)誤用戶名錯(cuò)誤，若用戶名輸入正確，而口令輸入錯(cuò)誤，則提示若用戶名輸入正確，而口令輸入錯(cuò)誤，則提示口令錯(cuò)誤口令錯(cuò)誤。在。在登錄登錄命令按鈕命令按鈕Click事件中空行處填加適當(dāng)?shù)恼Z(yǔ)句，使其能夠事件中空行處填加適當(dāng)?shù)恼Z(yǔ)句，使其能夠正確運(yùn)行。注意：不得做其他修改。正確運(yùn)行。注意：不得做其他修改。 4 本題的主要考核點(diǎn)是本題的主要考核點(diǎn)是SQL語(yǔ)句的應(yīng)用、文件的創(chuàng)建、表單控件代碼等。

8、語(yǔ)句的應(yīng)用、文件的創(chuàng)建、表單控件代碼等。 1.利用利用文件文件菜單下的菜單下的打開打開命令來(lái)打開數(shù)據(jù)庫(kù)文件命令來(lái)打開數(shù)據(jù)庫(kù)文件課程管理課程管理，或使用命令，或使用命令MODIFY DATABASE 課程管理。使用課程管理。使用SQL語(yǔ)句來(lái)建立視圖語(yǔ)句來(lái)建立視圖salary，SQL命令為：命令為：create sql view salary as; select 教師表教師表.系號(hào)系號(hào), AVG(教師表教師表.工資工資) AS 平均工資平均工資; FROM 課程管理課程管理!教師表教師表; GROUP BY 教師表教師表.系號(hào)系號(hào); ORDER BY 2 DESC并將此命令語(yǔ)句存儲(chǔ)在并將此命令語(yǔ)

9、句存儲(chǔ)在four.prg文件中。文件中。 5 2.利用利用文件文件菜單下的菜單下的打開打開命令來(lái)打開表單命令來(lái)打開表單six，或使用命令，或使用命令MODIFY FORM six。根據(jù)題目要求在。根據(jù)題目要求在登錄登錄命令按鈕的命令按鈕的Click事件的空行處添加適當(dāng)?shù)恼Z(yǔ)句：事件的空行處添加適當(dāng)?shù)恼Z(yǔ)句： USE 用戶表用戶表 GO TOP flag=0 do while not eof() &添加一條語(yǔ)句添加一條語(yǔ)句 IF Alltrim(用戶名用戶名)=Alltrim(Thisform.Text1.Value) IF Alltrim(口令口令)=Alltrim(Thisform.Te

10、xt2.Value) WAIT 歡迎使用歡迎使用 WINDOW TIMEOUT 2 ELSE WAIT 口令錯(cuò)誤口令錯(cuò)誤 WINDOW TIMEOUT 2 endif &添加一條語(yǔ)句添加一條語(yǔ)句 flag=1 EXIT ENDIF skip &添加一條語(yǔ)句添加一條語(yǔ)句 ENDDO IF flag=0 &添加一條語(yǔ)句添加一條語(yǔ)句 WAIT 用戶名錯(cuò)誤用戶名錯(cuò)誤 WINDOW TIMEOUT 2 ENDIF62. 為為生成表生成表命令按鈕編寫程序。程序的功能是根據(jù)表單運(yùn)行時(shí)復(fù)選框指定的字段命令按鈕編寫程序。程序的功能是根據(jù)表單運(yùn)行時(shí)復(fù)選框指定的字段和單選鈕指定的排序方式生成

11、新的自由表。如果兩個(gè)復(fù)選框都被選中，生成的自由和單選鈕指定的排序方式生成新的自由表。如果兩個(gè)復(fù)選框都被選中，生成的自由表命名為表命名為two.dbf，two.dbf的字段包括職工號(hào)、姓名、系名、工資和課程號(hào)；如果的字段包括職工號(hào)、姓名、系名、工資和課程號(hào)；如果只有只有系名系名復(fù)選框被選中，生成的自由表命名為復(fù)選框被選中，生成的自由表命名為one_x.dbf，one_x.dbf的字段包的字段包括職工號(hào)、姓名、系名和課程號(hào)；如果只有括職工號(hào)、姓名、系名和課程號(hào)；如果只有工資工資復(fù)選框被選中，生成的自由表命復(fù)選框被選中，生成的自由表命名為名為one_xx.dbf，one_xx.dbf的字段包括職工號(hào)

12、、姓名、工資和課程號(hào)。的字段包括職工號(hào)、姓名、工資和課程號(hào)。 3. 運(yùn)行表單，并分別執(zhí)行如下操作：運(yùn)行表單，并分別執(zhí)行如下操作： (1)選中兩個(gè)復(fù)選框和選中兩個(gè)復(fù)選框和按職工號(hào)升序按職工號(hào)升序單選鈕，單擊單選鈕，單擊生成表生成表命令按鈕；命令按鈕； (2)只選中只選中系名系名復(fù)選框和復(fù)選框和按職工號(hào)降序按職工號(hào)降序單選鈕，單擊單選鈕，單擊生成表生成表命令按鈕；命令按鈕； (3)只選中只選中工資工資復(fù)選框和復(fù)選框和按職工號(hào)降序按職工號(hào)降序單選鈕，單擊單選鈕，單擊生成表生成表命令按鈕。命令按鈕。三、綜合應(yīng)用（三、綜合應(yīng)用（1小題，計(jì)小題，計(jì)30分）分） 在考生文件夾下完成下列操作：在考生文件夾下完

13、成下列操作： 1. 建立一個(gè)如圖所示的表單名和文件名均為建立一個(gè)如圖所示的表單名和文件名均為myform的表單。表單的標(biāo)題是的表單。表單的標(biāo)題是教師情況教師情況，表，表單中有兩個(gè)命令按鈕（單中有兩個(gè)命令按鈕（Command1和和Command2），兩個(gè)復(fù)選框（），兩個(gè)復(fù)選框（Check1和和Check2）和兩個(gè)單選鈕（）和兩個(gè)單選鈕（Option1和和Option2）。）。Command1和和Command2的標(biāo)題分別是的標(biāo)題分別是生成生成表表和和退出退出，Check1和和Check2的標(biāo)題分別是的標(biāo)題分別是系名系名和和工資工資，Option1和和Option2的標(biāo)題分別的標(biāo)題分別是是按職工號(hào)

14、升序按職工號(hào)升序和和按職工號(hào)降序按職工號(hào)降序。7 本題的主要考核點(diǎn)是表單的創(chuàng)建、表單控件的添加、表單控件屬性的設(shè)置以及控本題的主要考核點(diǎn)是表單的創(chuàng)建、表單控件的添加、表單控件屬性的設(shè)置以及控件代碼等。件代碼等。 1.利用利用文件文件菜單下的菜單下的新建新建命令可創(chuàng)建新的表單文件，在命令可創(chuàng)建新的表單文件，在顯示顯示菜單中打開表菜單中打開表單控件工具欄，通過(guò)表單控件工具欄向表單中添加各控件。單控件工具欄，通過(guò)表單控件工具欄向表單中添加各控件。 2.通過(guò)屬性窗口設(shè)置表單及各控件的相關(guān)屬性，表單及各控件的相關(guān)屬性值如下：通過(guò)屬性窗口設(shè)置表單及各控件的相關(guān)屬性，表單及各控件的相關(guān)屬性值如下：對(duì)象對(duì)象

15、屬性名屬性名 值值表單表單 Name myform Caption 教師情況教師情況Command1 Caption 生成表生成表Command2 Caption 退出退出Check1 Caption 系名系名Check2 Caption 工資工資Option1 Caption 按職工號(hào)升序按職工號(hào)升序Option2 Caption 按職工號(hào)降序按職工號(hào)降序 3.為為生成表生成表命令按鈕的命令按鈕的Click事件編寫程序代碼：事件編寫程序代碼：a=thisform.check1.valueb=thisform.check2.valuec=thisform.optiongroup1.option

16、1.valued=thisform.optiongroup1.option2.value8if a=1 and b=1 if c=1 select 職工號(hào)職工號(hào),姓名姓名,系名系名,工資工資,課程號(hào)課程號(hào) from 課程管理課程管理!教師教師表表,課程管理課程管理!學(xué)院表學(xué)院表; where 教師表教師表.系號(hào)系號(hào)=學(xué)院表學(xué)院表.系號(hào)系號(hào); order by 職工號(hào)職工號(hào) into table two.dbf else if d=1 select 職工號(hào)職工號(hào),姓名姓名,系名系名,工資工資,課程號(hào)課程號(hào) from 課程管理課程管理!教師教師表表,課程管理課程管理!學(xué)院表學(xué)院表; where 教

17、師表教師表.系號(hào)系號(hào)=學(xué)院表學(xué)院表.系號(hào)系號(hào); order by 職工號(hào)職工號(hào) desc into table two.dbf endif endif endif9if a=1 and b=0 if c=1 select 職工號(hào)職工號(hào),姓名姓名,系名系名,課程號(hào)課程號(hào) from 課程管理課程管理!教師表教師表,課課程管理程管理!學(xué)院表學(xué)院表; where 教師表教師表.系號(hào)系號(hào)=學(xué)院表學(xué)院表.系號(hào)系號(hào); order by 職工號(hào)職工號(hào) into table one_x.dbf else if d=1 select 職工號(hào)職工號(hào),姓名姓名,系名系名,課程號(hào)課程號(hào) from 課程管理課程管理!教師表教師表,課課程管理程管理!學(xué)院表學(xué)院表; where 教師表教師表.系號(hào)系號(hào)=學(xué)院表學(xué)院表.系號(hào)系號(hào); order by 職工號(hào)職工號(hào) desc into table one_x.dbf endif endif endif10if a=0 and b=1 if c=1 select 職工號(hào)職工號(hào),姓名姓名,工資工資,課程號(hào)課程號(hào) from 課程管理課程管理!教師表教師表,課程課程管理管理!學(xué)院表學(xué)院表; where 教師表教師表.系號(hào)系號(hào)=學(xué)院表學(xué)院表.系號(hào)系號(hào); order by 職工號(hào)