未分类题

在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以6余2,除以5余3,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。
Private Sub Command1_Click()
num=Val(Text1.Text)
If 【8】 Then
Print num
Else
Text1.Text=''
【9】
End If
End Sub

A.Text)
B.Text=''

【参考答案】


正确: 1.(num Mod 6 = 2 And num Mod 5 = 3) 2.(Text1.SetFocus)