![[填空题] 下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除，果能则输出该数及平方值。请填空。 Private Sub Command1_Click() Di](http://www.mshxw.com/aiimages/31/254143.png "[填空题] 下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除，果能则输出该数及平方值。请填空。 Private Sub Command1_Click() Di")
[填空题] 下面程序的作用是用InputBox函数输入一个整数，然后判断能否同时被2，5和7整除，果能则输出该数及平方值。请填空。
Private Sub Command1_Click()
Dim numX As Integer
numX = Val (InputBox("请输入一个整数"))
If 【9】 Then
Form1．Print 【10】
End If
End Sub
参考答案：
【9】numX Mod 2 = 0 And numX Mod 5=0 And numX Mod 7=0【10】numX，numX^2问题解析:
【命题目的】本题考核考生对条件语句的书写及输出语句的使用。【解题要点】显然If后跟条件，根据已知，条件是“能否同时被2，5和7整除”，所以【9】应填入：numX Mod2 = 0 And numX Mod 5 = 0 And numX Mod 7 = 0；如果满足条件就显示出来并显示其平方值，所以【10】应填入的是：numX，numX^2
