初学者的问题 5或7的倍数VB怎么编？

一个考试题：

三、程序题
请填写完整如下程序段。其功能是：在文本框中输入数值，如果该数值是5或7的倍数则输出，否则将焦点定位在文本框中并清除文本框内容。
--------------------编程问答-------------------- if num mod 7=0 or num mod 5=0 then
输出
else
将焦点定位在文本框中并清除文本框内容
end if --------------------编程问答--------------------

引用 1 楼 angel6709 的回复:

if num mod 7=0 or num mod 5=0 then 
输出 
else 
将焦点定位在文本框中并清除文本框内容 
end if

能帮我写完吗？我实在是不懂 --------------------编程问答-------------------- 不会吧，LZ什么都不会呀，还是先看看书，学习些基础知识吧。 --------------------编程问答-------------------- 我是个初学者
只会到这里
Private Sub Text1_lostfocus()

  If Not IsNumeric(Text1) Then
  Text1 = ""
  Text1.SetFocus
End If

但是也不对 --------------------编程问答-------------------- 唉，真没办法呀。LZ在窗体那一个TEXTBOX和BUTTON，然后写入下面的代码就可以了。

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim dNumber As Decimal



        dNumber = Me.TextBox1.Text



        If dNumber Mod 5 = 0 OrElse dNumber Mod 7 = 0 Then

            MessageBox.Show("OK")

        Else

            MessageBox.Show("NG")

        End If

    End Sub

推荐一个网站http://bingning.net/free/source/index.html学习一下。

补充：.NET技术 ,  VB.NET