在考生文件夹下,打开资源数据库frdb,完成如下综合应用:设计一个表单控件名为form、表单文件名为fr show、表单标题名为“农户资源数据浏览”的表单,其表单界面如图3.16所示。其他要求如下: ①为表单建立数据环境,向数据环境依次添加fr t表(C

admin2015-12-11  32

问题 在考生文件夹下,打开资源数据库frdb,完成如下综合应用:设计一个表单控件名为form、表单文件名为fr show、表单标题名为“农户资源数据浏览”的表单,其表单界面如图3.16所示。其他要求如下:

①为表单建立数据环境,向数据环境依次添加fr t表(Cursor1)、p t表(Cursor2)和tree t表(Cursor3)。
②当在“户主编号”(Labell)标签右边的文本框(Textl)中输入户主编号并单击“查询”(Commandl)按钮时,将在右边的表格控件(Gridl)内显示该农户承包的土地编号、小地名、面积、树种编号、蓄积和承包年度信息(均取自fr t表),并在左边相应的文本框中显示该农户的姓名(Text2)、年龄(Text3)、性别(Text4)和家庭地址(Text5)  (均取自p t表)。
③单击“退出”(Command2)按钮时,关闭表单。
要求:表格(Grid 1)控件的RecordSourceType属性设置为“4一SQL说明”;  使用SQL的SELECT语句将根据输入的户主编号查询到的姓名、年龄、性别和家庭地址数据存放到一维数组tmp中,并将tnap数组诸元素的值赋值到各文本框。

选项

答案【操作步骤】 步骤1:命令窗口执行:OPEN DATABASE frdb,打开frdb数据库。 步骤2:命令窗口执行:CREATE FORM fr show,打开表单设计器新建表单。 步骤3:右击表单选择【数据环境】快捷菜单命令,继续在表单数据环境中单击右键选择【添加】快捷菜单命令,在“添加表或视图”对话框中依次双击fr t表、p t表和tree t表,将其添加到数据环境中。 步骤4:向表单添加五个标签、五个文本框、一个表格和两个命令按钮。选择表单对象,修改对象属性值,见表4.19。 [*] 步骤5:编写各个命令按钮的C1ick事件代码如下: *****“查询”按钮的C1ick事件代码***** THISFORM.GRIDI.RECORDSOURCE=”; sELEcT土地编号,小地名,面积,树种编号,蓄积,承包年度FROM FR T; WHERE户主编号=ALLTRIM(THISFORM. TEXT1.VALUE) ; INTO CURSOR TEMP” sELECT姓名,年龄,性别,家庭地址FROMP_ T; WHERE户主编号=ALLTRIM(THISFORM. TEXTl.VALUE); INTO ARRAY TMP THISFORM.TEXT2.VALUE=TMP(1) THISFORM.TEXT3.VALUE=TMP(2) THISFORM.TEXT4.VALUE=TMP(3) THISFORM.TEXT5.VALUE=TMP(4) *****“退出”按钮的Click事件代码***** THISFORM.RELEASE 步骤6:单击“常用”工具栏中“运行”按钮运行表单。

解析
转载请注明原文地址:https://kaotiyun.com/show/llbp777K
0

最新回复(0)