vb实验,求100以内的是6的倍数、7的倍数、6和7的倍数。将结果打印在相应...
发布网友
共1个回答
热心网友
Private Sub Command1_Click()
For i = 1 To 100
If i Mod 6 = 0 Or i Mod 7 = 0 Then
Picture1.Print i
End If
Next i
End Sub
