设计一个文件名和表单名均为“myform”的表单。表单的标题设为“使用零件情况统计”。表单中有一个组合框、一个文本框和两个命令按钮:“统计”和“退出”。运行表单时,组合框中有3个条目“s1”“s2”“s3”可供选择,单击“统计”命令按钮以后,则文本框显示出

admin2010-05-08  61

问题 设计一个文件名和表单名均为“myform”的表单。表单的标题设为“使用零件情况统计”。表单中有一个组合框、一个文本框和两个命令按钮:“统计”和“退出”。运行表单时,组合框中有3个条目“s1”“s2”“s3”可供选择,单击“统计”命令按钮以后,则文本框显示出该项目所用零件的金额(某种零件的会额=单价*数量)。单击“退出”按钮关闭表单。

选项

答案①在命令窗口内输入create form myform建立新的表单,在属性面板中将其Caprion修改为“使用零件情况统计”,将其Name属性修改为“myform”。 ②双击表单,在其Mini事件中输入如下代码: Thisform.Combo1.Additem("s1") Thisform.Combo1.Additem("s2") Thisform.Combo1.Additem("s3") ③单击【显示】→【数据环境】命令,在打开的对话框内选择“零件信息”表、项目组合框控件、一个文本框控件和两个命令按钮。 ④通过表单工具栏在表单里添加一个组合框控件、一个文本框控件和两个命令按钮。 ⑤选中第一个命令按钮,在属性对话框中将其Caption属性改为“统计”。双击该命令按钮,在其Click事件中输入: FROM INNER JOIN使用零件INNER JOIN项目信息;ON使用零件.项目号=项目信息.项目号;ON零件信息.零件号=使用零件.零件号;WHERE使用零件.项目号=ALLTRIM(THISFORM.combo1.VALUE) GROUP BY项目信息.项目号 INTO ARRAY TEMP 将属性对话框中的Caption属性改为“退出”。双击该命令按钮,在其Click事件中输入:Thisform.Release。 ⑥选中第二个命令按钮,在属性对话框中将其Caption属性改为“退出”。双击该命令按钮,在其Click事件中输入:thisform.release。 ⑦保存表单。

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

相关试题推荐
最新回复(0)