二、基本操作題

　　[操作步驟]

　　(1)利用“文件”菜單下的“打開(kāi)”命令來(lái)打開(kāi)考生文件夾

　　下的表單one，或使用命令“MODIFY FORM one”打開(kāi)表單one。雙擊“顯示”命令按鈕，在其Click事件中輸入代碼：ThisForm.Text1.Value=year(date())保存并運(yùn)行修改后的表單，查看運(yùn)行結(jié)果。

　　(2)單擊工具欄中的“打開(kāi)”按鈕，打開(kāi)考生文件夾下的表單two，在“表單”菜單中選擇“新建方法程序”命令，新建-個(gè)名為test的方法，在屬性窗口中雙擊此方法，在彈出的窗口中編寫(xiě)用戶自定義過(guò)程代碼：ThisForm.Commandl.Enabled=.f.在表單設(shè)計(jì)器環(huán)境下雙擊“測(cè)試”命令按鈕，編寫(xiě)Click事件代碼：ThisForm.Test保存并運(yùn)行修改后的表單，查看運(yùn)行結(jié)果。

　　(3)單擊工具欄中的“新建”按鈕，在“新建”對(duì)話框中選擇“報(bào)表”，單擊“新建文件”按鈕;選擇“報(bào)表”菜單下的“快速報(bào)表”命令，在“打開(kāi)”對(duì)話框中選擇考生文件夾下的“課程表”，在“快速報(bào)表”對(duì)話框中單擊“確定”按鈕;單擊工具欄中的“保存”按鈕，將快速報(bào)表名保存為study_report.

　　(4)在命令窗口輸入命令：alter table教師表alter職工號(hào)set check LEFT(職工號(hào)，3)=〝110〞按下回車(chē)鍵運(yùn)行命令。

　　[易錯(cuò)誤區(qū)]在Visual FoxPro中，新建的-個(gè)方法必須通過(guò)相應(yīng)的語(yǔ)句調(diào)用才能使用。在第(2)小題中，按照題目要求新建test方法后，還需要在命令按鈕的Click事件中對(duì)該方法進(jìn)行調(diào)用。

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

　　(1)[操作步驟]

　　步驟1：?jiǎn)螕艄ぞ邫谥械摹按蜷_(kāi)”按鈕，打開(kāi)考生文件夾下的數(shù)據(jù)庫(kù)文件“課程管理”。

　　步驟2：?jiǎn)螕艄ぞ邫谥械摹靶陆ā卑粹o，新建-個(gè)程序，輸入如下代碼。

　　CREATE sql VIEW salary AS SELECT教師表.系號(hào)，AV

　　(教師表.工資)As平均工資FROM教師表;

　　GROUP BY教師表.系號(hào)0RDER BY 2 DESC

　　步驟3：保存程序?yàn)閒our.prg，并運(yùn)行該程序。

　　(2)[操作步驟]

　　步驟1：?jiǎn)螕艄ぞ邫谥械摹按蜷_(kāi)”按鈕，打開(kāi)考生文件夾下的表單six.SCX，“登錄”按鈕中的代碼如下。

　　**********“登錄”按鈕的Click事件代碼**********

　　USE用戶表

　　GOTOP

　　flag=0

　　&&下面語(yǔ)句有錯(cuò)誤

　　WHILE.NOT.EOF()

　　IF Alhrim(用戶名)==Alltrim(Thisform.Tma1.Value)

　　IF Alltrim(口令)==Alhrim(Thisfonn.Texl2.Value)

　　WAIT”歡迎使用”WINDOW TIMEOUT 2

　　ELSE

　　WAIT”口令錯(cuò)誤”WINDOW TIMEOUT 2

　　ENDIF

　　nag=l

　　EXIT

　　ENDIF

　　&&下面語(yǔ)句有錯(cuò)誤

　　NEXT

　　ENDDO

　　&&下面語(yǔ)句有錯(cuò)誤

　　CASE FLAG=0

　　WAIT”用戶名錯(cuò)誤”WINDOW TIMEOUT 2

　　ENDIF

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

　　步驟2：修改程序中的錯(cuò)誤如下。

　　錯(cuò)誤l：將“WHILE”改為“DO WHIIE”。

　　錯(cuò)誤2：將“NEXT”改為“SKIP”。

　　錯(cuò)誤3：將“CASE”改為“IF”。

　　步驟3：保存并運(yùn)行表單。

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

　　[操作步驟]

　　步驟1：?jiǎn)螕艄ぞ邫谥械摹靶陆ā卑粹o，新建-個(gè)表單文件，通過(guò)表單控件工具欄向表單中添加兩個(gè)復(fù)選框、-個(gè)選項(xiàng)組和兩個(gè)命令按鈕，并將“教師表”和“學(xué)院表”添加到表單的數(shù)據(jù)環(huán)境中。

　　步驟2：設(shè)置表單的Name屬性為m#orm，Caption屬性為“教師情況”;設(shè)置兩個(gè)命令按鈕的Caption屬性分別為。生成表”和“退出”;設(shè)置兩個(gè)復(fù)選框的Caption屬性分別為。系名”和“工資”;兩個(gè)單選按鈕的Caption屬性分別為“按職工號(hào)升序”和“按職工號(hào)降序”。

　　步驟3：雙擊“生成表”按鈕，為“生成表”命令按鈕編寫(xiě)

　　Click"事件代碼。

　　*****“生成表”按鈕的Click事件代碼*****

　　a=ThisForm.Checkl.Value

　　b=ThisForm.Cheek2.Value

　　C=ThisFafm.Olptiongroupp1.Option1.Value

　　d=TlaisForm.0ptiongroup1.option2.Value

　　if a=l and b=l

　　if c=l

　　select職工號(hào)。姓名，系名，工資，課程號(hào)from教師表，

　　學(xué)院表;

　　Where教師表.系號(hào)=學(xué)院表.系號(hào);

　　order by職工號(hào);

　　into tablevtwo.dbf

　　else

　　if d=1

　　sdect職工號(hào)，姓名，系名，工資，課程號(hào)from教

　　師表，學(xué)院表;

　　where教師表.系號(hào)=學(xué)院表.系號(hào);

　　order by職工號(hào)desc;

　　曲inw n1ldC two.dbf

　　endif

　　endif

　　endif

　　if a=l andb=0

　　ifc=l

　　select職工號(hào)，姓名，系名，課程號(hào)from教師表，掣

　　院表;

　　whem教師表.系號(hào)=學(xué)院表.系號(hào);

　　order by職工號(hào);

　　into table one_x.dbf

　　else

　　ifd=l

　　select職工號(hào)，姓名，系名，課程號(hào)from教師表，

　　學(xué)院表;

　　where教師表.系號(hào)=學(xué)院表.系號(hào);

　　order by職工號(hào)desc;

　　into table one.x.dbf

　　endif

　　endif

　　endif

　　if a=O and b=1

　　ife=1

　　∞leet職工號(hào)，姓名，工資，課程號(hào)from教師表，掣

　　院表;

　　where教師表.系號(hào)=學(xué)院表.系號(hào);

　　order by職工號(hào);

　　into talde olle_xx.dbf

　　else

　　if d=1

　　select職工號(hào)，姓名，工資，課程號(hào)from教師表，

　　學(xué)院表：

　　where教師表.系號(hào)=學(xué)院表.系號(hào);

　　order by職工號(hào)desc;

　　into table one xx.dbf

　　endif

　　endif

　　cndif

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

　　步驟4：保存表單名為myform，按題目要求運(yùn)行表單并執(zhí)行相關(guān)操作。

　　相關(guān)推薦：

　　各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試報(bào)名時(shí)間匯總

　　各地2016年計(jì)算機(jī)等級(jí)考試準(zhǔn)考證打印時(shí)間匯總

　　各地2016年全國(guó)計(jì)算機(jī)等級(jí)考試費(fèi)用匯總