题目内容
（请给出正确答案）
在窗体上有一个命令按钮Commandl，编写事件代码如下：
Private SuB cormmandl_Click()
Dim y As Integer
y=0
Do
y=Input Box(“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
简答题官方参考答案
（由简答题聘请的专业题库老师提供的解答）
更多“在窗体上有一个命令按钮Commandl，编写事件代码如下：Private SuB cormmandl_Click（)Dim y As Inte”相关的问题
在窗体上有一个命令按钮Commandl，编写事件代码如下：
Private SuB commandl_Click()
Dim d1 As Date
Dim d2 As Date
d1=#12/25/2009#
d2=#1/5/2010#
MsgBox DateDiFF(“WW”,d1,d2)
End SuB
打开窗体运行后，单击命令按钮，消息框中输出的结果是
A．1
B．2
C．10
D．11
在窗体上有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：
Private SuB cormmandl_Click()
Dim i,j,x
For i=i To 20 step 2
x=0
For j=1 To 20 step 2
x=x+1
Next j
Next i
Text1.Value=Str(x)
End SuB
打开窗体运行后，单击命令按钮，文本框中显示的结果是
A．1
B．7
C．17
D．400
在窗体上有一个命令按钮Commandl，通用过程fun和命令按钮的事件过程如下： Private Function fun(By m As Integer) If m Mod 2=0 Then fun=2 Else Fun=1 Else If End Funcion Private Sub Commandl_Click() Dim i Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，则窗体上输出A.6 B.7 C.8 D.9
在窗体上有一个命令按钮Commandl，编写事件代码如下：
Private SuB commandl_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call Proc(x,y)
OeBug.Print x;y
End SuB
PuBlic SuB Proc(n As Integer,Byval m As Integer)
n=n Mod 10
m=m Mod 10
End SuB
打开窗体运行后，单击命令按钮，立即窗口上输出的结果是
A．2 32
B．12 3
C．2 2
D．12 32
（25）在窗体上有一个命令按钮Commandl，编写下列程序： Private Sub Command1_Click() Print ppl(3,7) End Sub Public Funcion ppl(x As Single,n As Integer)As Single If n=0 Then ppl=1 Else If n Mod 2=1 Then ppl=x*x+n Else ppl=x*x-n End If End If End Funcion 程序运行后，单击该命令按钮，屏幕上显示的是 A.2 B.1 C.0 D.16
A.1
B.2
C.10
D.11
A.1
B.7
C.17
D.400
A.232
B.123
C.22
D.1232
A.375564281919
B.105020
C.1050200
D.3755642819
窗体Forml上有一个名称为Commandl的命令按钮，以下对应窗体单击事件的事件过程是
A．Private Sub Forml_Click() … End Sub
B．Private Sub Form_Click() … End Sub
C．Private Sub Commandl_Click() … End Sub
D．Private Sub Command_Click() … End Sub
警告：系统检测到您的账号存在安全风险
为了保护您的账号安全，请在“简答题”公众号进行验证，点击“官网服务”-“账号验证”后输入验证码“”完成验证，验证成功后方可继续查看答案！
