在办公场所说话时，音量要尽量控制，不要大声喧哗。

下面程序段的作用是从文本框中输入数据，如果该数据满足条件：除以6余2，除以5余3，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。
Private Sub Command1_Click()
num=Val(Text1.Text)
If ______ Then
Print num
Else
Text1. Text=""
______
End If
End Sub