填空题

下面程序的作用是用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
<上一题 目录 下一题>
热门 试题

填空题
把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print KeyCodeEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print KeyAsciiEnd Sub程序运行后，如果按下B键，则在窗体上输出的数值是【 】和【 】。
填空题
以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。Sub RecArea(L，W)Dim S As DoubleS=L*WMsgBox Total Area is & Str(S)End SubPrivate Sub Command1_Click()Dim M，NM=InputBox( What is the L )M=Val(M)【 】 N=Val(N)【 】 End Sub
相关试题