建立表单,表单文件名和表单名均为myform_a,表单标题为"商品浏览",表单样例如图所示(左图)。其它功能要求如下: (1)用选项按钮组(OptionGroup1)控件选择商品分类(饮料(Option1)、调味品(Option2)、酒类(Option3)

admin2013-11-10  50

问题 建立表单,表单文件名和表单名均为myform_a,表单标题为"商品浏览",表单样例如图所示(左图)。其它功能要求如下:
(1)用选项按钮组(OptionGroup1)控件选择商品分类(饮料(Option1)、调味品(Option2)、酒类(Option3)、小家电(Option4));
(2)单击"确定(Command2)命令按钮,显示选中分类的商品,要求使用DO CASE语句判断选择的商品分类(如右图所示);
(3)单击"退出(Command1)命令按钮,关闭并释放表单。
注:选项按钮组控件的Value属性必须为数值型。
   

选项

答案【操作步骤】 步骤1:单击常用工具栏中的"新建"按钮,文件类型选择"表单",打开表单设计器。单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"myform_a"即可。 步骤2:在"表单设计器"中,在"属性"的Caption处输入"商品浏览",在Name处输入"myform_a"。 步骤3:在"表单设计器"中,添加一个选项按钮组OptionGroup1,在"属性"的ButtonCount处输入"4",并对其进行编辑,在Option1的Caption处输入"饮料",在Option2的Caption处输入"调味品",在Option3的Caption处输入"酒类",在Option4的Caption处输入"小家电"。 步骤4:在"表单设计器"中,添加两个命令按钮,在第1个命令按钮"属性"的Caption处输入"退出",在第2个命令按钮"属性"的Caption处输入"确定"。 步骤5:在"表单设计器"中,双击退出命令按钮,在"Command1.Click"编辑窗口中输入"Thisform. Release",接着关闭编辑窗口。 步骤6:在"表单设计器"中,双击确定命令按钮,在"Command2.Click"编辑窗口中输入下列语句,接着关闭编辑窗口。 DO CASE CASE THISFORM.OPTIONGROUP1.VALUE=1 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称="饮料") CASE THISFORM.OPTIONGROUP1.VALUE=2 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称="调味品") CASE THISFORM.OPTIONGROUP1.VALUE=3 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称="酒类") CASE THISFORM.OPTIONGROUP1.VALUE=4 SELECT * FROM 商品 WHERE 分类编码=ANY(SELECT 分类编码 FROM 分类 WHERE 分类名称="小家电") ENDCASE

解析 创建表单,添加相关控件,并设置表单及控件的相关属性和方法,编写程序语句完成表单功能。
转载请注明原文地址:https://kaotiyun.com/show/k8op777K
0

最新回复(0)