在考生文件夹下,打开销售数据库,完成如下综合应用: 设计一个名称为“bd2”的表单,表单的标题为“销售信息浏览”。表单上设计一个包含3个选项卡的“页框”和一个“关闭,命令按钮。要求如下: ①为表单建立数据环境,按顺序向数据环境添加地区表、业绩表

admin2010-08-26  45

问题 在考生文件夹下,打开销售数据库,完成如下综合应用:
   设计一个名称为“bd2”的表单,表单的标题为“销售信息浏览”。表单上设计一个包含3个选项卡的“页框”和一个“关闭,命令按钮。要求如下:
   ①为表单建立数据环境,按顺序向数据环境添加地区表、业绩表和商品信息表。
   ②按从左至右的顺序,3个选项卡的标题分别为“地区表”“业绩表”和“商品信息表”,每个选项卡上均有一个表格控件,分别显示对应表的内容。
   ③单击“关闭”按钮关闭表单。

选项

答案①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,将Caption属性值修改为“销售信息浏览”,单击表单控件工具栏上的“页框”控件图标,为表单添加一个页框PageFrame1,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加一个命令按钮Command1,单击表单控件工具栏上的“表格”控件图标,冉添加一个表格控件Grid1。 ②选择页框PageFrame1,在页框属性窗口中修改“PageGount”属性值为“3”,选择页框PageFrame1,单击右键,在弹出的快捷菜单中选择“编辑”,单击“Page1”,在页框属性窗口中修改“Caption”属性值为“地区表”;单击“Page2”,在页框属性窗口中修改“Caption”属性值为“业绩表”;单击“Page3”,在页框属性窗口中修改“Caption”属性值为“商品信息表”。 ③选择命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“关闭”,如图77-1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。 [*] ④选择页框PageFrame1,在页框属性窗口中双击“Click Event”打开“Click"事件代码编辑窗口,输入以下代码: ThisForm.Grid1.RecordSource Type=0 DO CASE CASE ThisForm.PageFrame1.Activepage=1 ThisForm.Grid1.RecordSource="地区" CASE ThisForm.PagcFrame1.Activepagc=2 ThisForm.Grid1.RecordSource="业绩" CASE ThisForm.PageFrame1.Activepage=3 ThisForm.Grid1.RecordSource="商品信息" ENDCASE ThisForm.Crid1 Refresh ⑤选择【表单】→【执行表单】命令,在弹出的“另存为”对话框中输入表单文件名“bd2”,保存在考生文件夹下,然后运行表单。

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

最新回复(0)