UC知道VB简单编程问题，VB爱好者请进！请问第一空和第二空应该怎样填？
来源：百度知道 编辑：UC知道 时间：2024/06/21 09:50:11
完善程序。目前世界人口为60亿，如果以每年1.4%的速度增长，求多少年后世界人口达到或超过70亿，并将结果在窗体上打印出来。
Private Sub Command1_Click()
Dim p As Double
Dim r As Single
Dim n As Integer
p = 60
r = 0.014
n = 0
Do While ______ '第一空
p = ______ '第二空
n = n + 1
Loop
Print n; "年后"; "世界人口达"; p; "亿"
End Sub
谢谢两位了！我是VB新手，能否请您们再说说n= 0 及n = n + 1 的含义？
Private Sub Command1_Click()
Dim p As Double
Dim r As Single
Dim n As Integer
p = 60
r = 0.014
n = 0
Do While ______ '第一空
p = ______ '第二空
n = n + 1
Loop
Print n; "年后"; "世界人口达"; p; "亿"
End Sub
谢谢两位了！我是VB新手，能否请您们再说说n= 0 及n = n + 1 的含义？
p<70
p*(1+r)
n起计数的作用,结合程序可以这样理解
n=0 '计数年份的起始值，一开始为0
Do While p<70 '循环条件，人口不到70亿就一直循环
p=p*(1+r) '人口一增长1.4%
n=n+1 '年份就增加一年
loop '循环
第一空:p < 70
第二空:p*1.014
================================
n= 0是初始化年份，
n = n + 1表示没循环一次年份就+1，这样就知道过了多少年了
在这里，n代表多少年的意思。
第一空：p<70
第二空：p+p*r
N=0是初始年份
N=N+1是在上面那个循环中，可以看成是满足条件的循环次数