A-A+

下面程序的作用是用InputBox函数输入一个整数然后判断能否同时被2 5和7整除果能则

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

问题详情

下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除，果能则输出该数及平方值。请填空。 Private Sub Command1_Click() Dim numX As Integer numX = Val (InputBox("请输入一个整数")) If【】Then Form1．Print【】 End If End Sub

请帮忙给出正确答案和分析，谢谢！

参考答案

正确答案：numX Mod 2 = 0 And numX Mod 5=0 And numX Mod 7=0 numXnumX^2
显然If后跟条件，根据已知，条件是“能否同时被2，5和7整除”，所以【】应填入：numXMod2=0AndnumXMod5=0AndnumXMod7=0；如果满足条件就显示出来并显示其平方值，所以【】应填入的是：numX，numX^2