填空题
下面程序段的作用是从文本框中输入数据,如果该数据满足条件:除以6余2,除以5余3,则输出,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 Private Sub Command1_Click() num=Val(Text1.Text) If ______ Then Print num Else Text1. Text="" ______ End If End Sub
1、
【正确答案】
1、{{*HTML*}}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。