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

admin2009-01-15  36

问题 在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以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 , Text1.SetFocus

解析 程序调用了Val( )函数从文本框中的得到数据。本题中先通过Val( )函数得到一个整数,进行条件判断,如果满足条件num Mod 6=2 And num Mod 5=3则输出num;否则,将清空文本框,焦点落在文本框中,应使用语句Text.SetFocus。
转载请注明原文地址:https://jikaoti.com/ti/c280FFFM
0

最新回复(0)