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

  • 1、
【正确答案】 1、{{*HTML*}}【8】num Mod6=2 And num Mod 5=3
【9】Text1.SetFocus    
【答案解析】解析:程序调用了Val---|||________|||---函数从文本框中的得到数据。本题中先通过Val---|||________|||---函数得到一个整数,进行条件判断,如果满足条件num Mod 6=2 And num Mod 5=3则输出num;否则,将清空文本框,焦点落在文本框中,应使用语句Text.SetFocus。