【正确答案】步骤1:通过"新建"对话框新建一个表单。在打开的表单设计器中,修改表单的Caption属性为"人员查询",Name属性为"formone.scx"。
步骤2:根据题目要求向表单添加一个标签label1,并将其Caption属性修改为"输入部门"。添加一个文本框text1以及两个命令按钮,分别将两个命令按钮的Caption属性修改为"查询"和"退出"。
步骤3:在表单设计器中,右键单击表单空白处,选择"数据环境"命令,将"部门"表和"职工"表添加到数据环境中。向表单添加一个表格Grid1,将其Name属性修改为"Gridone",RecordSource属性设为"职工",RecordSourceType属性设为"4-SQL说明"。
步骤4:双击"查询"命令按钮,编写其Click事件代码如下:
************"查询"命令按钮的Click事件代码***********
Thisform.Gridone.RecordSource="SELECT 姓名,性别,出生日期,编号 FROM 职工,部门;
WHERE 职工.部门编号=部门.部门编号;
AND 名称=ALLTRIM(Thisform.Textone.Value) INTO table tableone;
order by 编号 "
*******************************************************
步骤5:双击"退出"命令按钮,编写其Click事件代码"ThisForm.Release"。
步骤6:保存表单为"pform"并运行,在文本框中输入部门名称"开发部",单击"查询"按钮。
【答案解析】