[填空题] 在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以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
[填空题] 在有下面一个程序段从文本框中输入数据,如果该数据满足条件,除以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
【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。
VIP截止日期:2025-01-01 14:32:14
←请使用支付宝扫码支付VIP截止日期:2025-01-01 14:32:14
←请使用微信扫码支付