a,b已知,c=a+b,ci=a+(i-1)b求用VB编写个程序输出c1,c2,c3.的值

a,b已知,c=a+b,ci=a+(i-1)b求用VB编写个程序输出c1,c2,c3.的值
a,b已知,c=a+b,ci=a+(i-1)b求用VB编写个程序输出c1,c2,c3.的值

a,b已知,c=a+b,ci=a+(i-1)b求用VB编写个程序输出c1,c2,c3.的值
Private Sub Command1_Click()
Dim a As Double
Dim b As Double
Dim i As Integer
Dim c(10) As Variant '这里输出了c(1)到c(10)
a = 100
b = 200
For i = 1 To UBound(c)
c(i) = a + (i - 1) * b
Print c(i)
Next i
End Sub