vb第5章2.pptVIP

思考: 1. 求13+33+53+……+n3 2. 求1-3+5-7+…+(-1)n+1(2n-1) 1. 在窗体上显示1到20之间所有能被3整除的数。 5.3.2 While…Wend循环 前面我们介绍了For…Next循环，它适合于解决循环次数事先能够确定的问题。对于只知道控制条件，但不能预先确定需要执行多少次循环体的情况，我们可以使用While循环。 格式： While 条件 [循环体] Wend 【例】求 Private Sub Form_Click() N% = 1:Sum!= 0 Do item = 1 / (N * N) Sum = Sum + item N = N + 2 Loop Until item = 0.00001 Print 运算结果为:; Sum Print 最后一项的值为:; item End Sub 【例】已知某乡镇企业现有产值 P和年增长率R ，试问多少年后，该企业的产值 P可以翻一番。翻一番后实际产值 V是多少？ 分析: P—现有产值; R—年增长率 Y—年; V—增长后的产值，初始值为P Private Sub F