vb 中输入一个数字,如果是5的倍数但不是7的倍数,输出yes,否则输出no 的程
答案:2 悬赏:80 手机版
解决时间 2021-11-24 00:28
- 提问者网友:最美的风景
- 2021-11-23 09:13
vb 中输入一个数字,如果是5的倍数但不是7的倍数,输出yes,否则输出no 的程
最佳答案
- 五星知识达人网友:七十二街
- 2021-11-23 10:01
Dim s As String
Dim i As Long
s = InputBox("请输入一个大于0的整数")
i = Int(Val(s))
If i Mod 5 = 0 And i Mod 7 <> 0 Then
MsgBox "Yes"
Else
MsgBox "No"
End If
Dim i As Long
s = InputBox("请输入一个大于0的整数")
i = Int(Val(s))
If i Mod 5 = 0 And i Mod 7 <> 0 Then
MsgBox "Yes"
Else
MsgBox "No"
End If
全部回答
- 1楼网友:渊鱼
- 2021-11-23 10:29
x = Val(InputBox("请输入一个数字"))
MsgBox IIf(x Mod 5 = 0 And x Mod 7 <> 0, "Yes", "No")
MsgBox IIf(x Mod 5 = 0 And x Mod 7 <> 0, "Yes", "No")
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯