编写个用于计算存款利息的程序
答案:2 悬赏:40 手机版
解决时间 2021-05-17 14:44
- 提问者网友：风月客
- 2021-05-17 10:50
要VB编，谢谢了
最佳答案
- 五星知识达人网友：未来江山和你
- 2021-05-17 11:28
Sub Form_Click()
Dim p As Currency
p=10000:r=.125
t=1
Again:
If t >10 Then GoTo 100
i=p*r
p=p+i
t=t+i
GoTo Again
100
Print p
End Sub
全部回答
- 1楼网友：鱼忧
- 2021-05-17 11:41
解释下该程序
Sub Form_Click()
Dim p As Currency
p=10000:r=.125
t=1
Again:
If t >10 Then GoTo 100
i=p*r
p=p+i
t=t+i
GoTo Again
100
Print p
End Sub
本金为10000（p），年利率为.125（r），每年复利计息一次，10年本利合计是多少。程序中“Again：”为标号，100为行号。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯