![[填空题] 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输山文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Priva,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E4%B8%8B%E5%88%97%E7%A8%8B%E5%BA%8F%E6%AE%B5%E7%9A%84%E5%8A%9F%E8%83%BD%E6%98%AF%EF%BC%9A%E4%BB%8E%E6%96%87%E6%9C%AC%E6%A1%86%E4%B8%AD%E8%BE%93%E5%85%A5%E4%B8%80%E4%B8%AA%E6%95%B0%E5%80%BC%EF%BC%8C%E5%A6%82%E6%9E%9C%E8%AF%A5%E6%95%B0%E5%80%BC%E6%BB%A1%E8%B6%B3%E2%80%9C%E9%99%A4%E4%BB%A54%E4%BD%991%EF%BC%8C%E9%99%A4%E4%BB%A55%E4%BD%992%E2%80%9D%E6%9D%A1%E4%BB%B6%EF%BC%8C%E5%88%99%E5%9C%A8%E7%AA%97%E4%BD%93%E4%B8%8A%E8%BE%93%E5%B1%B1%E6%96%87%E6%9C%AC%E6%A1%86%E4%B8%AD%E7%9A%84%E6%95%B0%E5%80%BC%EF%BC%8C%E5%90%A6%E5%88%99%EF%BC%8C%E5%B0%86%E7%84%A6%E7%82%B9%E5%AE%9A%E4%BD%8D%E5%9C%A8%E6%96%87%E6%9C%AC%E6%A1%86%E4%B8%AD%EF%BC%8C%E5%B9%B6%E6%B8%85%E9%99%A4%E6%96%87%E6%9C%AC%E6%A1%86%E7%9A%84%E5%86%85%E5%AE%B9%E3%80%82%E8%AF%B7%E5%A1%AB%E7%A9%BA%E3%80%82+Priva.png "[填空题] 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输山文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Priva,第1张")
[填空题] 下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输山文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click() x=Val(Text1.Text) If______Then Print x Else ______ Text1.Text="" End If End Sub
正确答案：x Mod 4=1 And x Mod 5=2 Text1.SetFocus
参考解析：题目要求程序满足的条件是“除以4余1，除以5余2”，这个条件中包含了一个逻辑并和两个求模运算。其中，逻辑并运算符用“And”表示，取余运算符用Mod表示，因此，程序中的If条件应是“x Mod 4=1 And x Mod 5=2”；SetFocus方法是将焦点移至指定的控件或窗体。
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）