显示出1000以内所有能被37和17 整除的数 循环结构 vb

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/30 14:44:05

显示出1000以内所有能被37和17 整除的数 循环结构 vb
显示出1000以内所有能被37和17 整除的数 循环结构 vb

显示出1000以内所有能被37和17 整除的数 循环结构 vb
Private Sub Command1_Click()
Dim i%
Text1.Text = ""
For i = 1 To 1000
If i Mod 17 = 0 And i Mod 37 = 0 Then
Text1.Text = Text1.Text + Str(i)
End If
Next
End Sub
好像只有629一个吧.