作业帮 > 综合 > 作业

vb题在屏幕上输出显示500以内所有能被17整除的自然数

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/04/29 15:44:27
vb题在屏幕上输出显示500以内所有能被17整除的自然数
在界面上放一个按钮就行了,然后将下面的代码复制到代码窗口.
Private Sub Command1_Click()
Me.Cls
i = 0
For j = 1 To 500
If j Mod 17 = 0 Then
If i = 5 Then i = 0
Print Tab(i * 10); j;
i = i + 1
End If
Next j
End Sub
Private Sub Form_Load()
Command1.Caption = "开始"
End Su