[填空题] 在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以6余2,脓以5余3,则输出.否则,特焦点定位在文本框中,并清除文本框的内容。  Private Sub Command1_Cl

14 查阅

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

参考答案:

num Mod6=2 And num Mod 5=3

程序调用了Val( )函数从文本框中的得到数据。本题中先通过Val( )函数得到一个整数,进行条件判断,如果满足条件num Mod 6=2 And num Mod 5=3则输出num;否则,将清空文本框,焦点落在文本框中,应使用语句Text.SetFocus。

计算机考试