Question

用VB求100到199的平方根的和

请各位大虾们帮忙，急需用编程求出100到199的平方根的和...
谢谢大家了!

Answer 1

Private Sub Form_Click()
Dim I as integer, S as double
for i=100 to 199
S=S + Sqr(i)
Next
Print S
End Sub

Answer 2

Private Sub Form_Click()
Dim i as integer, s as long
s=0
For i=100 to 199
s=s + i * i
Next i
Print s
End Sub

Answer 3

Dim i%, a%

For i = 100 To 199
a = a + Sqr(i)
Next

Print a