用VB编程 用for的方法：某人目前存款有20万，银行每年利率为2.25%，问多少年后此人的存款将超过30万

19年

Dim I As Double ‘double高精度

I = 20 '万元为单位

j = 0 '用于计算多少年

For I = 20 To 30 Step 0 'i是银行里的钱，少于30万则要加利息，不过用while更规范，更容易理解，只是你的题目要用for只好这样，另一种方法使用年份做循环条件，但是这样以后不好改

I = I 10225 '加利息

j = j + 1 '年份加1

Next

最后j为年份，19年

i为存款，305234073483563万元

Private Sub Form_Click()

p = 10000

r = 0125

Print "p=" & p

Print "r=" & r

For i = 1 To 10

p = p (1 + r)

Next

p = Format(p, "00")

Print "Sum=" & p

End Sub

解释下该程序

Sub

Form_Click()

Dim

p

As

Currency

p=10000:r=125

t=1

Again:

If

t

>10

Then

GoTo

100

i=pr

p=p+i

t=t+i

GoTo

Again

100

Print

p

End

Sub

本金为10000（p），年利率为125（r），每年复利计息一次，10年本利合计是多少。程序中“Again：”为标号，100为行号。

以上就是关于用VB编程 用for的方法：某人目前存款有20万，银行每年利率为2.25%，问多少年后此人的存款将超过30万全部的内容，包括:用VB编程 用for的方法：某人目前存款有20万，银行每年利率为2.25%，问多少年后此人的存款将超过30万、用vb来编写，计算存款利息.当本金为10000(p),年利率为0.125®时每年复利计息一次,计算10年本利合计是多、编写个用于计算存款利息的程序等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！