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

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/27 00:47:28
显示出1000以内所有能被37和17整除的数循环结构vb显示出1000以内所有能被37和17整除的数循环结构vb显示出1000以内所有能被37和17整除的数循环结构vbPrivateSubComman

显示出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一个吧.