VB 输出同时能被3和7整除的数

2025-04-03 06:05:11

推荐回答（3个）

回答1：

用Mod 运算符来将两数作除法运算，但返回其余数为0条件判断。

Mod 运算符，用来对两个数作除法并且只返回余数。

And 运算符，用来对两个表达式进行逻辑连接。

假设某数是i：

i Mod 3 = 0 And i Mod 7 = 0

    Dim i As Long
    For i = 1 To 1000
        If i Mod 3 = 0 And i Mod 7 = 0 Then Print i
    Next

回答2：

用mod,如下述测试100是否能被3和7整除

如：
Dim a
Dim b

a = 100 mod 3
b = 100 mod 7

If a=0 and b=0 Then
'能被3和7同时整除
else
'不能被3和7同时整除
End If

回答3：

Dim I As Integer
Dim str As String
For I = 1 To 10000
If I Mod 7 = 0 And I Mod 3 = 0 Then
str = str & "," & I
End If
Next I
Print str