题目内容（请给出正确答案）

[主观题]

有如下事件过程： PrivateSubCommand1_Click（） DimmAsInteger,nAsInteger m=2:n=1 Print

有如下事件过程：

Private Sub Command1_Click（）

Dim m As Integer, n As Integer

m=2: n=1

Print "m="; m; "n="; n

Call TOD（m, n）

Print "m="; m; "n="; n

End Sub

Sub TOD（x, y）

x=x ^ 2

y=y ^ 3

End Sub

程序运行后，输出的结果为（）。

A．m＝2，n＝1

m＝1，n＝2

B．m＝2，n＝1

m＝4，n＝1

C．m＝1，n＝2

m＝1，n＝4

D．m＝1，n＝2

m＝2，n＝4

提问人：网友lovejmm 发布时间：2022-01-06

参考答案

查看官方参考答案

如搜索结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装简答题APP，拍照搜题省时又省心！

更多“有如下事件过程： PrivateSubCommand1_Cl…”相关的问题

第1题

有如下事件过程：Prirate Sub Form_Click（)A$="123": B$="456"x=Val（A$)+Val（B$)Print x\100End S

有如下事件过程： Prirate Sub Form_Click() A$="123": B$="456" x=Val(A$)+Val(B$) Print x\100 End Sub 程序运行后，单击窗体，则窗体上显示的内容是______。

A．123

B．3

C．5

D．579

点击查看答案

第2题

若在某窗体模块中有如下事件过程：Privam Sub Command1_Click（Index As Integer)......End Sub则

若在某窗体模块中有如下事件过程： Privam Sub Command1_Click(Index As Integer) ...... End Sub 则以下叙述中正确的是______。

A．此事件过程与不带参数的事件过程没有区别

B．有—个名称为Command1的窗体，单击此窗体则执行此事件过程

C．有一个名称为Command1的控件数组，数组中有多个不同类型控件

D．有—今名称为Command1的控件数组，数组中有多个相同类型控件

点击查看答案

第3题

若在某窗体模块中有如下事件过程 PrivateSubCommand1_Click（IndexASInteger）……EndSub则

若在某窗体模块中有如下事件过程

Private Sub Command1_Click（Index AS Integer）

……

End Sub

则以下叙述中正确的是（）。

A．此事件过程与不带参数的事件过程没有区别

B．有1个名称为Command1的窗体,单击此窗体则执行此事件过程

C．有1个名称为Command1的空件数组,数组中有多个不同类型控件

D．有1个名称为Command1的空件数组,数组中有多个相同类型控件

点击查看答案

第4题

有如下事件过程。 Private Sub Form_KeyDown（KeyCode As Integer,Shift As Integer)If （Button An

有如下事件过程。

Private Sub Form_KeyDown(KeyCode As Integer,Shift As Integer)

If (Button And 3)=3 Then

Print "OK"

End If

End Sub

程序运行后,为了在窗体上输出"OK",应当按下的鼠标键是

A．左键

B．右键

C．同时按下左键和右键

D．按什么都不显示

点击查看答案

第5题

有如下事件过程：Private Sub Command1_Click（) b=10 Do Until b =-1 a = InputBox（"请输入a的值"

有如下事件过程： Private Sub Command1_Click() b=10 Do Until b =-1 a = InputBox("请输入a的值") a = Val(a)b = InputBox("请输入b值") b = Val(b)a=a*b Loop Print a End Sub 程序运行后，依次输入数值30，20，10，-1后，输出结果为()。

A．6000

B．-10

C．200

D．-6000

点击查看答案

第6题

有如下事件过程：Private Sub Form_KeyDown（KeyCode As Integer，Shift As Integer)If （Button And

有如下事件过程：

Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)

If (Button And 3) =3 Then

Print "OK"

End If

End Sub

程序运行后，为了在窗体上输出“OK”，应当按下的鼠标键是

A．左键

B．右键

C．同时按下左键和右键

D．按什么键都不显示

点击查看答案

第7题

有如下事件过程： SubABD（x%,y%,z%） z%=x%+y% EndSub PrivateSubCommand1_Click（） a%=30

有如下事件过程：

Sub ABD（x%, y%, z%）

z%=x% + y%

End Sub

Private Sub Command1_Click（）

a%=30: b%=40

Call ABD（a%, b%, c%）

Print c%

End Sub

运行上面的程序，单击命令按钮，输出结果为（）。

A．70

B．70.0

C．7.0E+1

D．显示错误信息

点击查看答案

第8题

有如下Sub过程： Sub Sun（x As Single, y As Single) t=x x=t/y y=t Mod yEnd Sub在窗体上的命令

有如下Sub过程： Sub Sun(x As Single, y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上的命令按钮Command1中，编写如下事件过程，执行该事件过程调用Sun过程，结果为()。 Private Sub Command1_Click() Dim a As Single Dim b As Single a=5 b=4 Sun a, b Print a; b End Sub

A．1.25 1

B．5 4

C．4 5

D．1 1.25

点击查看答案

第9题

有如下事件过程： Private Sub Command1_Click（) b=10 Do Until b=-1 a=InputBox（"请输入a的

有如下事件过程： Private Sub Command1_Click() b=10 Do Until b=-1 a=InputBox("请输入a的值") a=Val(A)b=InputBox("请输入b的值") b=Val(B)a=a * b Loop Print aEnd Sub程序运行后，依次输人数值30，20，10，-1，输出结果为

A．6000

B．-10

C．200

D．-6000

点击查看答案

第10题

窗体有命令按钮Commandl和文本框Textl，对应的事件代码如下：Private Sub Commandl_Click（)For i=1

窗体有命令按钮Commandl和文本框Textl，对应的事件代码如下：

Private Sub Commandl_Click()

For i=1 To 4

x=3

For j=l to 3