A-A+

在有下面一个程序段从文本框中输入数据如果该数据满足条件除以6余2 脓以5余3 则输出．否

2022-08-12 20:14:20 问答库阅读 197 次

问题详情

在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以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()函数得到一个整数，进行条件判断，如果满足条件numMod6=2AndnumMod5=3则输出num；否则，将清空文本框，焦点落在文本框中，应使用语句Text．SetFocus。