下面程序段的作用是从文本框中输入数据，如果该数据满足条件：除

问题填空题

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

答案

参考答案：num Mod 6=2 And num Mod 5=3或num Mod 5=3 And num Mod 6=2
Text1. SetFocus

解析：根据题意，“除以6余2，除以5余3”的表达式为：num Mod 6=2 And num Mod 5=3，而“将焦点定位在文本框中”考查的是焦点的获取操作，表达式为Text1. SetFocus。