在VB中求100以内个位数为7的所有数及其所有数之和.

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/28 17:41:27

在VB中求100以内个位数为7的所有数及其所有数之和.

Private Sub Command1_Click()
Sum = 0
For i = 0 To 9
Print 10 * i + 7;
Sum = Sum + 10 * i + 7
Next i
Print
Print "Sum="; Sum
End Sub