(1)在考生文件夹下建立一个文件名和表单名均为oneform的表单,该表单中包括两个标签(Label1和Label2)、一个选项按钮组(OptionGmup1)、一个组合框(Combol)和两个命令按钮(Command1和Command2),Label1和

admin2017-07-28  26

问题 (1)在考生文件夹下建立一个文件名和表单名均为oneform的表单,该表单中包括两个标签(Label1和Label2)、一个选项按钮组(OptionGmup1)、一个组合框(Combol)和两个命令按钮(Command1和Command2),Label1和Label2的标题分别为“工资”和“实例”,选项组中有两个选项按钮,标题分别为“大于等于”和“小于”,Command1和Command2的标题分别为“生成”和“退出”,如下图所示。

    (2)将组合框的RowSourceType和RowSource属性手工指定为5和a,然后在表单的Load事件代码中定义数组a并赋值,使得程序开始运行时,组合框中有可供选择的“工资”实例为3000、4000和5000。
    (3)为“生成”命令按钮编写程序代码,其功能是:表单运行时,根据选项按钮组和组合框中选定的值,将“教师表”中满足工资条件的所有记录存入自由表salary.dbf中,表中的记录先按“工资”降序排列,若“工资”相同再按“姓名”升序排列。
    (4)为“退出”命令按钮设置Click事件代码,其功能是关闭并释放表单。
    (5)运行表单,在选项组中选择“小于”,在组合框中选择“4000”,单击“生成”命令按钮,最后单击“退出”命令按钮。

选项

答案【操作步骤】 步骤1:在命令窗口输入“Create Form oneform”并按回车键,新建一个名为oneform表单。 步骤2:在表单控件工具栏中以拖曳的方式向表单中添加两个标签、一个选项组、一个组合框和两个命令按钮,并修改各控件的属性。如图3.86所示。 [*] 步骤3:双击表单空白处,编写表单的Load事件代码。 ******表单的Load事件代码****** public a(3) a(1)="3000" a(2)="4000" a(3)="5000" *********************** 步骤4:双击命令按钮,分别编写“生成”和“退出”按钮的Click事件代码。 ****“生成”按钮的Click事件代码**** &&对X进行赋值 X=val(ThiSForm.combol.Value) &&判断分支一 if ThisForm.Optiongroupl.Value=1 &&选择工资大于等于x的记录,结果按工资的降序排列并存储入表salary中 select*from教师表where工资>=x order by 工资desc,姓名into table salary &&判断分支二 Else &&选择工资小于x的记录,结果按工资的降序排列并存储入表salary中 select*from教师表where工资 <x order by工资desc,姓名into table salary endif *****“退出”按钮的click事件代码***** ThisForm.Pelease *********************** 步骤5:保存表单,并按题目要求运行表单。

解析
转载请注明原文地址:https://jikaoti.com/ti/KBX0FFFM
0

最新回复(0)