三、簡單應用題

　　42在考生文件夾下完成如下簡單應用：

　　(1)打開“課程管理”數據庫,使用SQL語句建立一個視圖salary,該視圖包括系號和平均工資兩個字段,

　　并且按平均工資降序排列。將該SQL語句存儲在four.prg文件中。

　　(2)打開考生文件夾下的表單six,如下圖所示,“登錄”命令按鈕的功能是：當用戶輸入用戶名和口令以后,單擊“登錄’’按鈕時,程序在自由表“用戶表”中進行查找,若找不到相應的用戶名,則提示“用戶名錯誤”,若用戶名輸入正確,而口令輸入錯誤,則提示“口令錯誤”。修改“登錄”命令按鈕Click事件中標有錯誤的語句,使其能夠正確運行。注意：不得做其他修改。

　　參考解析：

　　(1)[操作步驟]

　　步驟l：單擊工具欄中的“打開”按鈕，打開考生文件夾下的數據庫文件“課程管理”。

　　步驟2：單擊工具欄中的“新建”按鈕，新建-個程序，輸入如下代碼。

　　CREATE sql VIEW salary AS SELECT教師表.系號，AV

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

　　GROUP BY教師表.系號0RDER BY 2 DESC

　　步驟3：保存程序為four.prg，并運行該程序。

　　(2)[操作步驟]

　　步驟l：單擊工具欄中的“打開”按鈕，打開考生文件夾下的表單six.SCX，“登錄”按鈕中的代碼如下。

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

　　USE用戶表

　　GOTOP

　　flag=0

　　&&下面語句有錯誤

　　WHILE.NOT.EOF()

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

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

　　WAIT”歡迎使用”WINDOW TIMEOUT 2

　　ELSE

　　WAIT”口令錯誤”WINDOW TIMEOUT 2

　　ENDIF

　　nag=1

　　EXIT

　　ENDIF

　　&&下面語句有錯誤

　　NEXT

　　ENDDO

　　&&下面語句有錯誤

　　CASE FLAG=0

　　WAIT”用戶名錯誤”WINDOW TIMEOUT 2

　　ENDIF

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

　　步驟2：修改程序中的錯誤如下。

　　錯誤1：將“WHILE”改為“DO WHIIE”。

　　錯誤2：將“NEXT”改為“SKIP”。

　　錯誤3：將“CASE”改為“IF”。

　　步驟3：保存并運行表單。

　　相關推薦：

　　2015年計算機二級考試《VFP》復習重點匯總

　　2015年計算機二級《VFP》精選上機練習題匯總

　　2015計算機二級考試《VFP》沖刺習題及解析匯總