在有下面一个程序段从文本框中输入数据 如果该数据满足条件 除以6余2 脓以5余3 则输出．否则 特焦
在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以6余2，脓以5余3，则输出．否则，特焦点定位在文本框中，并清除文本框的内容。 Private Sub Command1_Click( ) num=Val(Text1．Text) If【 】Then Print num Else Text1．Text=" " 【 】 End If End Sub
请帮忙给出正确答案和分析，谢谢！
参考解答
400***264
2023-07-22 08:11:16
正确答案：num Mod6=2 And num Mod 5=3 Text1．SetFocus
程序调用了Val()函数从文本框中的得到数据。本题中先通过Val()函数得到一个整数，进行条件判断，如果满足条件numMod6=2AndnumMod5=3则输出num；否则，将清空文本框，焦点落在文本框中，应使用语句Text．SetFocus。
相似问题
有一个事件过程 其功能是：从已存在于磁盘上的顺序文件NMl．txt中读取数据 计算读 出数据的平方值
有一个事件过程，其功能是：从已存在于磁盘上的顺序文件NMl．txt中读取数据，计算读 出数据的平方值，将该数据及其平方值存入新的顺序文件NMtxt中。请填
在窗体上画一个文本框和—个图片框 然后编写如下两个事件过程： Private Sub Form_Cl
在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1 Text="VB程序设计" End Sub Private Sub Text
下列程序是判断一个整数(>=3)是否为素数 请补充完整。 Dim n As Integer n=In
下列程序是判断一个整数(>=3)是否为素数，请补充完整。 Dim n As Integer n=InputBox("请输入一个整数(>=3)") k=Int(Sqr(n)) i=2 swit=0 While
当对象得到焦点时 会触发【 】事件 当对象失去焦点时将触发【 】事件。请帮忙给出正确答案和分析 谢谢
当对象得到焦点时，会触发【 】事件，当对象失去焦点时将触发【 】事件。请帮忙给出正确答案和分析，谢谢！
下列程序的输出结果为【 】。 num=2 While num
下列程序的输出结果为【 】。 num=2 While num<=3 num=num+1 Print num Wend请帮忙给出正确答案和分析，谢谢！
