VB程序题：我国有13亿人口，按人口年增长0.8%计算，多少年我国人口超过26亿。

VB程序题：我国有13亿人口，按人口年增长0.8%计算，多少年我国人口超过26亿。
提示：
已知年增长率 r=0.8% 求人数超过26亿的年数n的公式为

  其中log(x)为对数函数。

先在窗体上画一个按钮，再画一个标签，代码如下：

Private Sub Command1_Click()
  n = Int(Log(2) / Log(1.008) + 1)
  Label1 = n & "年后人数超过26亿"
End Sub
 
运行程序，点击按钮，输入的结果是：87年后人数超过26亿

Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码

打赏 支付宝打赏 微信打赏

来源：济亨网

本文链接：http://wb86.com/post/57.html