在考生文件夹下,完成如下综合应用: 建立如图所示表单,表单完成一个计算器的功能。表单文件名和表单控件名均为calculator,表单标题为"计算器"。 表单运行时,分别在操作数1(Label1)和操作数2(Label2)下的文本框(分别为Text1和Tex

admin2013-10-25  32

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

选项

答案【操作步骤】 步骤1:单击常用工具栏中的"新建"按钮,文件类型选择"表单",打开表单设计器。单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"calculator"即可。 步骤2:在"表单设计器"中,在表单控件的"属性"对话框的Name处输入"calculator",在Caption处输入"计算器"。 步骤3:在"表单设计器"中,依次建立Label1、Label2和Label3三个标签,并分别修改其标题Caption的值,依次为"操作数1"、"操作数2"和"计算结果"。 步骤4:在"表单设计器"中,依次建立Text1、Text2和Text3三个文本框,Text3的Enable属性选择".F-假."。 步骤5:在"表单设计器"中,添加一个"选项按钮组",在其"属性"的ButtonCount处输入"4",调整这四个按钮的排列位置以及各个Caption的值。 步骤6:在"表单设计器"中,添加两个命令按钮(Command1和Command2),将第1个命令按钮Command1的Caption属性改为"计算",将第2个命令按钮Command2的Caption属性改为"关闭"。 步骤7:双击"计算"按钮,在"Command1.Click"编辑窗口中输入下列程序 do case case thisForm.optiongroup1.value=1 thisForm.Text3.Value=val(thisForm.Text1.Value)+val(thisForm.Text2.Value) case thisForm.optiongroup1.value=2 thisForm.Text3.Value=val(thisForm.Text1.Value)-val(thisForm.Text2.Value) case thisForm.optiongroup1.value=3 thisForm.Text3.Value=val(thisForm.Text1.Value)*val(thisForm.Text2.Value) case thisForm.optiongroup1.value=4 thisForm.Text3.Value=val(thisForm.Text1.Value)/val(thisForm.Text2.Value) endcase 步骤8:双击"关闭"命令按钮,在"Command2.Click"编辑窗口中输入"ThisForm.Release",接着关闭编辑窗口。

解析 利用表单设计器新建表单,添加各控件,设置相关属性和方法,编写执行程序。
转载请注明原文地址:https://jikaoti.com/ti/vtT0FFFM
0

最新回复(0)