运用VB信息框编写一个程序

来源：百度知道 编辑：UC知道 时间：2024/06/08 19:36:02
编写一个计算银行存款的程序,由用户输入本金和年数,按照存款年利率2.0%计算出存款到期时能够得到的总存款额,运算结果必须用信息框输出.
很急呀

你要的是这个?
Private Sub Form_Click()
Dim NYear, OriMon, SumR
Const MonRate As Single = 1.02

NYear = InputBox("请输入年数")
OriMon = InputBox("请输入本金(元)")
SumR = Val(OriMon) * 1.02 ^ Val(NYear)
MsgBox "年数:" & NYear & " 本金:" & OriMon & " 总存款:" & SumR
End Sub