【说明】
本应用程序是一个乘法计算器,其运行窗口如图2所示。
在该界面中,“被乘数”、“乘数”以及“积”等文字为标签,相应的3个输入输出数据框为文本框,此外还有3个命令按钮。用户在“被乘数”和“乘数”相应的文本框内输入数据,再单击“运算”按钮,便能在“积”对应的文本框中看到相乘的结果;当用户单击“清除”按钮时,就会清除各文本框中的数据;当用户单击“关闭”按钮时就会关闭该窗口并退出应用程序。用户不能在“积”对应的文本框中输入数据。
【属性设置】
各个对象、有关的属性名以及需要修改的属性值设计如下:
对象 | 对象名 | 属性名 | 属性值 |
窗体 | frmMultiply | Caption | 乘法计算器 |
标签1 | Lbl1 | Caption | 被乘数: |
标签2 | Lbl2 | Caption | 乘数: |
标签3 | Lbl3 | Caption | 积: |
文本框1 | Txt1 | Text | (空) |
文本框2 | Txt2 | Text | (空) |
文本框3 | Txt3 | Text | (空) |
Enabled | (1) | ||
按钮1 | (2) | Caption | 运算 |
按钮2 | cmdClear | Caption | 清空 |
按钮3 | cmdClose | Caption | 退出 |
Private Sub cmdMultiply_Click( )
txt3. Text =Trim(Str$ ( (3) ) ’加法运算获得和数
End Sub
Private Sub (4) (
txt1. Text=" " ’空字符串赋值给文本框txt1的内容
txt2. Text=" " ’空字符串赋值给文本框txt2的内容
txt3. Text=" " ’空字符串赋值给文本框txt3的内容
End Sub
Private Sub cmdClose_Click( )
(5) ’退出应用程序
End Sub
参考答案:(1)False (2)cmdMultiply
(3)Val(txt1.Text)*Val(txt2.Text)或其等价形式
(4)cmdClear-Click
(5)End或Unload frmMultiply或其等价形式
解析: (1)空处需要填写文本框3的Enabled属性,在说明中已经指出用户不能在“积”对应的文本框中输入数据,因此其Enabled属性为“False”。
(2)空处需要填写按钮1(运算按钮)的名称,从程序代码的Private Sub cmdMaltiply_Click()事件中,可以判断按钮1的名称为“cmdMultiply”。
(3)空处所在语句是进行乘积运算,由于文本框的文字是字符类型,不能直接进行乘积运算,先要将它转换成数据型再进行乘积运算。因此(3)空处应当填写“Val(txt1.Text)*Val(txt2.Text)”或其等价形式。
(4)空处需要填写一个事件的名称,从下面的代码可以看出这是“清空”按钮Click事件所完成的工作,“清空”按钮的名称为“cmdClear”,因此(4)空应填写“cmdClear_Click”。
(5)空处需要填写退出应用程序的语句。在VB中,这样的语句有很多,常用有两个,一个是“End”,另一个“Unload<窗口名称>”。