VB编程：输入一个整数，判断它是不是5，7的倍数，程序结果要具体指出各种情况

举个例子：
Private Sub Form_Load()
Dim k
Dim l As Boolean, m As Boolean
k = InputBox("输入一个整数数")
If k = "" Or Int(Val(k)) <> k Then End
If Int(k / 5) = k / 5 Then l = True
If Int(k / 7) = k / 7 Then m = True
If l = False And m = False Then
MsgBox "这个整数既不是5的倍数也不是7的倍数"
Else
If l = True And m = True Then
MsgBox "这个整数既是5的倍数也是7的倍数"
Else
If l = False Then
MsgBox "这个整数是7的倍数"
Else
MsgBox "这个整数是5的倍数"
End If
End If
End If
End
End Sub

Private Sub form_click()
Dim n%
n = InputBox("请输入整数n:")
If n Mod 5 = 0 And n Mod 7 = 0 Then
MsgBox (n & "是5的倍数也是7的倍数!")
ElseIf n Mod 5 = 0 And n Mod 7 <> 0 Then
MsgBox (n & "是5的倍数不是7的倍数!&q