【例4.2.5】简单利息计算程序设银行的定期存款利率为:一年期2.52%,二年期3.06%,三年期3.69%,五年期4.14%(不计复息)。请输入存款金额,并选择存款年限,编程计算到期本息合计总值。
Select Case语句Private Sub Command1_Click ( )Dim money !, interest !,year%money = Val( Text1.Text )······Text2.Text =money *interest *yearEnd Sub
相关推荐: