VB判定数字是否为5或7的倍数

本代码片段展示了如何使用VB语言判断一个整数是否为5或7的倍数。

Dim num As Integer

num = 15

If (num Mod 5 = 0) Or (num Mod 7 = 0) Then
    MsgBox(num & " 是5或7的倍数")
Else
    MsgBox(num & " 不是5或7的倍数")
End If

代码首先定义一个整数变量 num 并赋值。然后使用 Mod 运算符计算 num 除以5和7的余数。如果其中任意一个余数为0,则说明 num 是5或7的倍数,否则不是。

frm 文件大小:996B