2道VB作业题

来源：百度知道 编辑：UC知道 时间：2024/06/07 06:08:20
1、请编写程序，设置一个命令按钮，单击时弹出输入对话框接收基本工资和附加工资，然后将总工资金额打印在窗体上。

2、请编制程序，设置一个命令按钮，弹出输入对话框接收基本工资和附加工资，然后将总工资金额用消息框输出，输出内容为“张三的工资是****元”。（注：****为用户输入的数据之和）
在线等~~~

第一题：
Private Sub Command1_Click()
Dim a As Double, b As Double
a = InputBox("请输入基本工资")
b = InputBox("请输入附加工资")
Print a + b
End Sub

第二题
Private Sub Command1_Click()
Dim a As Double, b As Double
a = InputBox("请输入基本工资")
b = InputBox("请输入附加工资")
MsgBox "张三的工资是" & a + b & "元"
End Sub

1.
Private Sub Command1_Click()
a1 = Val(InputBox("基本工资", "请输入", 0))
a2 = Val(InputBox("附加工资", "请输入", 0))
Print a1 + a2
End Sub

2.
Private Sub Command1_Click()
a1 = Val(InputBox("基本工资", "请输入", 0))
a2 = Val(InputBox("附加工资", "请输入", 0))
msgbox "张三的工资是"& a1 + a2 & "元",,"提示"
End Sub