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

admin2009-01-15  46

问题 下面程序的作用是用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 , numX,numX^2

解析 显然If后跟条件,根据已知,条件是“能否同时被2,5和7整除”,所以【  】应填入:numX Mod2 = 0 And numX Mod 5 = 0 And numX Mod 7 = 0;如果满足条件就显示出来并显示其平方值,所以【  】应填入的是:numX,numX^2
转载请注明原文地址:https://jikaoti.com/ti/do80FFFM
0

最新回复(0)