Question

vb计算50-200之间被7整除余2的整数之和

Answer 1

dim i as integer ,s as integer
s=0
for i=50 to 200
if 粗埋喊i 液缺mod 7 =2 then
  岩野  s=s+i
end if
next
print s

Answer 2

Private Sub Form_Click()
Dim i As 纤掘Integer
Dim sum 毁局核As Integer
For i = 50 To 200
 If i Mod 7 = 2 Then
 sum = sum + 腊举i
 'Form1.Print i
 End If
Next
Form1.Print sum
End Sub