网友您好, 请在下方输入框内输入要搜索的题目:
题目内容
(请给出正确答案)
( 32 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:
Private Sub Commandl_Click()
Dim y As Integer
y = 0
D o
y = InputBox (" y= ")
If (y Mod 10) + Int(y / 10) = 10 Then Debug.Print y ;
Loop Until y = 0
End Sub
打开窗体运行后,单击命令按钮,依次输入 10 、 37 、 50 、 55 、 64 、 20 、 28 、 19 、 -19 、 0 ,立即窗口上输出的结果是
A ) 37 55 64 28 19 19
B ) 10 50 20
C ) 10 50 20 0
D ) 37 55 64 28 19
参考答案
更多 “ ( 32 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:Private Sub Commandl_Click()Dim y As Integery = 0D oy = InputBox (" y= ")If (y Mod 10) + Int(y / 10) = 10 Then Debug.Print y ;Loop Until y = 0End Sub打开窗体运行后,单击命令按钮,依次输入 10 、 37 、 50 、 55 、 64 、 20 、 28 、 19 、 -19 、 0 ,立即窗口上输出的结果是A ) 37 55 64 28 19 19B ) 10 50 20C ) 10 50 20 0D ) 37 55 64 28 19 ” 相关考题
考题
( 33 )在窗体上有一个命令按钮 Commandl ,编写事件代码如下:Private Sub Command1_Click()Dim x As Integer, y As Integerx = 12: y = 32Call Proc(x, y)Debug.Print x; yEnd SubPublic Sub Proc(n As Integer, ByVal m As Integer)n = n Mod 10m = m Mod 10End Sub打开窗体运行后,单击命令按钮,立即窗口上输出的结果是A ) 2 32B ) 12 3C ) 2 2D ) 12 32
考题
在窗体上有一个命令按钮Commandl,编写事件代码如下:Private SuB commandl_Click()Dim x As Integer,y As Integerx=12:y=32Call Proc(x,y)OeBug.Print x;yEnd SuBPuBlic SuB Proc(n As Integer,Byval m As Integer)n=n Mod 10m=m Mod 10End SuB打开窗体运行后,单击命令按钮,立即窗口上输出的结果是A.2 32B.12 3C.2 2D.12 32
考题
在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl Click( ) Dim Y As Integer y=0 Do y=InputBox(”y=”) If(Y Mod l0)+Int(y/10)=10 Then Debug.Print Y; LoopUntil y=0 End Sub 打开窗体运行后,单击命令按钮,依次输入10、37、50、55、64、20、28、19、-19、0,立即窗口上输出的结果是( )。A.375564281919B.105020C.1050200D.3755642819
考题
在窗体上有一个命令按钮Commandl,编写事件代码如下:Private Sub Commandl Click( ) Dim X As Integer,Y As Integer x=12:y=32 Call Proc(x,Y) Debug.Print X;Y End Sub Public Sub proc(n As Integer,ByVal in As Integer) n=n Mod 10 m=m Mod 1O End Sub 打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。A.232B.123C.22D.1232
考题
|在窗体上有一个命令按钮Commandl,编写事件代码如下: Private Sub Commandl_Click( ) Dim X As Integer,Y As Integerx=12:y=32Call Proc(x,y)EndSubPublic Sub Proc{n As Integer,ByVM mAs mteger}n=nMod l0m=mModl0EndSub打开窗体运行后,单击命令按钮,立即窗口上输出的结果是( )。l考点5过程调用与参数传递1A.2 32B.12 3C.2 2D.12 32
考题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下事件过程: Private Sub Commandl_Click() Dim() a=Array(”机床”,”车床”,”钻床”,”轴承”)Printa(2)EndSub程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。A.机床B.车床C.钻床D.轴承
考题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:Private Sub Command1_Click()Dim x As Integer,y As Integerx=12:y=32Call p(x,y)MsgBox x*yEnd SubPublic Sub p(n As Integer,By Val m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。
热门标签
最新试卷