建立如图1-37所示表单,表单完成一个计算器的功能。表单文件名和表单控件名均为calculator,表单标题为“计算器”。 表单运行时,分别在操作数1 (Label1)和操作数2(Label2)下的文本框(分别为Text1和Text2)中输入数字

admin2013-03-31  21

问题 建立如图1-37所示表单,表单完成一个计算器的功能。表单文件名和表单控件名均为calculator,表单标题为“计算器”。

    表单运行时,分别在操作数1 (Label1)和操作数2(Label2)下的文本框(分别为Text1和Text2)中输入数字(不接受其他字符输入),通过选项组(Optiongroup1,4个按钮可任意排列)选择计算方法(Option1为“+”,Option2为“-”,Option3为“木”,Option4为“/”),然后单击命令按钮“计算”(Command1),就会在“计算结果”(Label3)下的文本框Text3中显示计算结果,要求使用DO CASE语句判断选择的计算分类,在CASE表达式中直接引用选项组的相关属性。
    注意:所涉及的数字和字母均为半角字符。
    表单另有一命令按钮(Command2),按钮标题为“关闭”,表单运行时单击此按钮关闭并释放表单。

选项

答案步骤1:在命令窗口执行命令:CREATE FORMcalculator,打开表单设计器新建表单。从“表单控件”工具栏中依次向表单添加三个标签、三个文本框、两个命令 按钮和一个选项组控件。 步骤2:在“属性”面板的下拉框中选择表单对象,在“全部”选项卡中修改对象属性值,见表2-39,注意,在设置选项组按钮为4个以后,要调整选项组的大小,才能显示新增的两个单选按钮,系统默认的只显示两个。 [*] 步骤3:双击命令按钮,编写各个命令按钮的Click事件代码。各按钮代码如下: *****“计算”按钮的Click事件代码***** N=THISFORM.OPTIONGROUP1.VALUE DO CASE CASE N=1 THISFORM.TEXT3.VALUE=THISFORM. TEXT1.VALUE+THISFORM.TEXT2.VALUE CASE N=2 THISFORM.TEXT3.VALUE=THISFORM. TEXTl.VALUE-THISFORM.TEXT2.VALUE CASE N=3 THISFORM.TEXT3.VALUE=THISFORM. TEXT1.VALUE*THISFORM.TEXT2.VALUE CASE N=4 THISFORM.TEXT3.VALUE=THISFORM. TEXT1.VALUE/THISFORM.TEXT2.VALUE ENDCASE *****“关闭”按钮的Click事件代码***** THISFORM.RELEASE 步骤4:单击“常用”工具栏中的“运行”按钮查看结果,将表单文件保存到考生文件夹下。

解析 本大题考查了表单及控件的常用属性和方法的设置。本题看似比较麻烦,其实所涉及的内容主要是控件属性值的使用。可将主要设计过程按以下操作步骤进行:根据题目要求对各控件及属性值进行设置,通过指定文本框的InputMask属性值为:99999,表示文本框只能接收5位数值型数据,指定Value属性值为:0,表示该文本框的数据类型为数值型。
    通过DO CASE分支结构判断当前被选定的是哪个单选项,即进行何种运算。然后通过相应算术表达式进行计算。文本框中的数据可以通过VALUE属性值获取。例如,当进行“+”运算时,第3个文本框中计算结果的取值应为THISFORM.TEXT1.VALUE+THISFORM.TEXT2.VALUE的值。
转载请注明原文地址:https://jikaoti.com/ti/VPZ0FFFM
0

最新回复(0)