华南俳烁实业有限公司

　　綜合應(yīng)用(1小題，計(jì)30分)

　　建立一個(gè)表單，表單文件名和表單控件名均為myform_c，表單標(biāo)題為

　　"職工訂單信息"，表單界面如圖所示，共有三個(gè)文本為職工號(hào)(Label1)、姓名

　　(Label2)和性別(Label3)的標(biāo)簽，還有三個(gè)對(duì)應(yīng)的文本框Text1、Text2和Text3，

　　和一個(gè)表格控件Grdorders。其它功能如下：

　　1. 程序運(yùn)行時(shí)，在文本框Text1中輸入一個(gè)職工號(hào)的值，并單擊DO(Command1)

　　按鈕，然后在Text2文本框中顯示職工的姓名，在Text3文本框中顯示職工的性別，

　　在表格控件(Grdorders)中顯示該職工的訂單(orders表)的信息。

　　2. 單擊Close命令按鈕(Command2)關(guān)閉表單。

　　注意：在表單設(shè)計(jì)器中將表格控件Grdorders的數(shù)據(jù)源類型設(shè)置為SQL語(yǔ)句。

　　解題思路：

　　1. 建立表單. 在“表單設(shè)計(jì)器”中，在“屬性”的Caption處輸入“職工訂單信息”，在Name處輸入“myform_c”。在“表單設(shè)計(jì)器”中，添加三個(gè)標(biāo)簽，在第1個(gè)標(biāo)簽Label1“屬性”的Caption處輸入“職工號(hào)”，在第2個(gè)標(biāo)簽Label2“屬性”的Caption處輸入“姓名”，在第3個(gè)標(biāo)簽Label3“屬性”的Caption處輸入“性別”。在“表單設(shè)計(jì)器”中，添加三個(gè)文本框，Text1、Text2和Text3。在“表單設(shè)計(jì)器”中，添加一個(gè)表格Grid1，在其“屬性”的Name處輸入“Grdorders”，在RecordSourceType處選擇“4-SQL說明”。在“表單設(shè)計(jì)器”中，添加兩個(gè)命令按鈕，在第1個(gè)命令按鈕“屬性”的Caption處輸入“DO”，在第2個(gè)命令按鈕“屬性”的Caption處輸入“Close”。在“表單設(shè)計(jì)器”中，雙擊“Command2”命令按鈕，在“Command2.Click”編輯窗口中輸入“Release Thisform”，接著關(guān)閉編輯窗口。在“表單設(shè)計(jì)器”中，雙擊“Command1”命令按鈕，在“Command1.Click”編輯窗口中輸入下列語(yǔ)句，接著關(guān)閉編輯窗口。

　　zgh=ALLTRIM(ThisForm.Text1.Value)

　　If Used("employee")

　　SELECT employee

　　ELSE

　　USE employee

　　ENDIF

　　LOCATE FOR 職工號(hào)=zgh

　　ThisForm.Text2.Value=姓名

　　ThisForm.Text3.Value=性別

　　ThisForm.Grdorders.RecordSource="SELECT * FROM orders WHERE 職工號(hào)=='"+zgh+"'INTO CURSOR LSB"