题目内容
（请给出正确答案）
[单选题]
（23）在子过程Sub…End Sub中使用的形式参数可以是
A.常数、简单变量、数组变量和运算式
B.简单变量、数组变量和数组元素
C.常数、简单变量、数组变
D.简单变量、数组变量和运算式
提问人：网友jiaoer234
发布时间：2022-01-06
如搜索结果不匹配，请 
A.常数、简单变量、数组变量和运算式
B.简单变量、数组变量和数组元素
C.常数、简单变量、数组变量
D.简单变量、数组变量和运算式
题目内容
（请给出正确答案）
您可能会需要：
安装简答题APP，拍照搜题省时又省心！
更多“（23）在子过程Sub…End Sub中使用的形式参数可以是…”相关的问题
第2题
分别编写一个判断正整数是否是素数的函数过程和子过程...
分别编写一个判断正整数是否是素数的函数过程和子过程，并调用，结果在窗体上显示。程序代码如下： Private Sub Form_Load() Dim m%, b As Boolean m = Val(InputBox("Enter m:")) Print "调用函数过程：" If______(1)______ Then Print m & " is prime!" Else Print m & " is not prime!" End If Print "调用子过程：" Call ______(2)______ If b Then Print m & " is prime!" Else Print m & " is not prime!" End If End Sub Public Function prime(ByVal n%) As Boolean Dim i% prime = True For i = 2 To Sqr(n) If n Mod i = 0 Then prime = False Exit For End If Next i End Function Public Sub prime1(ByVal n%, ______(3)______ As Boolean ) Dim i% flag = True For i = 2 To Sqr(n) If n Mod i = 0 Then flag=False Exit For End If Next i End Sub 完善程序，在答题时，务必在答题框中写好题号和答案，如下： (1)： _________ (2)： _________ (3)： _________
第3题
假定在窗体中的通用声明段已经定义有如下的子过程：Sub f（x As Single,y As Single)t=xx=yy=xEnd
假定在窗体中的通用声明段已经定义有如下的子过程： Sub f(x As Single,y As Single) t=x x=y y=x End Sub 在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程： Private Sub Command1_Click() a=10 b=20 f(a，b) MsgBox a&b End Sub 打开窗体运行后，单击命令按钮，消息框输出的值分别为()。
A．20和10
B．10和20
C．10和10
D．20和20
第4题
设有如下的子过程： Public Sub p1（ByRef x%, ByVal y%) x = 3 * x y = y + 1 End Sub Sub Comman
设有如下的子过程： Public Sub p1(ByRef x%, ByVal y%) x = 3 * x y = y + 1 End Sub Sub Command1_Click() Dim a%,b% a = 1: b = 2 Call p1(a, b) MsgBox("a=" & a & " b=" & b ) End Sub 则在Command1_Click中 MsgBox 显示的结果是____________。
A、a=1 b=2
B、a=3 b=2
C、a=3 b=3
D、a=1 b=3
E、a=4 b=4
第5题
子过程定义如下： Public Sub F1（ByRef n%) … n=3*n+4 … End Sub Sub Button1_Click（……) Handles Button1.Click Dim n%, m% n=3 m=4 … ' 调用F1语句 … End Sub 则在Button1_Click事件中有效的调用语句是____________。
A.F1(m)
B.F1(n+m)
C.F1(4)
D.F1(3+4)
E.F1(m,n)
第6题
（32 ）在菜单编辑器中建立 1 个名称为 Menu0 的菜单项，将其 “ 可见 ” 属性设置为 False ，并建立
其若干子菜单，然后编写下列事件过程：
点击查看答案
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
If Button=1 Then
PopupMenu Menu0
End If
End Sub
则下列叙述中错误的是（）。
A ）该过程的作用是弹出一个菜单
B ）单击鼠标右键时弹出菜单
C ） Menu0 是在菜单编辑器中定义的弹出菜单的名称
D ）参数 X 、 Y 指明鼠标当前位置的坐标
第7题
Button1单击事件过程和ProcString子过程定义如下，当单击Button1后，标签 Label1中输出的结果是___
_______。 Private Sub Button1_Click() Handles Button1.Click Dim s$ = "中国大学MOOC" Call ProcString(s) Label1.Text = s End Sub Sub ProcString(ByVal m$) m = Mid(m, 4, 2) End Sub
点击查看答案
A、中国大学MOOC
B、大学
C、MOOC
D、OC
E、中国大学
第8题
设有如下的子过程： Public Sub F1（ByVal n%, ByRef m%) n = n Mod 10 m = m \ 10 End Sub Private Sub Command1_Click（) Dim x%, y% x = 12: y = 34 Call F1（x, y) MsgBox（x & " " & y) End Sub 则在Command1_Click中
A.1 3
B.12 3
C.2 34
D.12 34
E.1 4
第9题
在菜单编辑器中建立1个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜
单，然后编写如下过程：
点击查看答案
Private Sub Form_MouseDown（Button As Integer,Shift As Integer,X As Single,Y As Single）
If Button=1 Then
PopupMenu Menu0
End If
End Sub
则以下叙述中错误的是（）。
A．该过程的作用是弹出一个菜单
B．单击鼠标右键时弹出菜单
C．Menu0是在菜单编辑器中定义的弹出菜单的名称
D．参数X、Y指明鼠标当前位置的坐标
第10题
在菜单编辑器中建立1个名称为Menu0的菜单项，将其“可见”属性设置为False，并建立其若干子菜单，然后
编写如下过程： Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single) If Buaon=1 Then PopupMenu Menu0 End If End Sub 则以下叙述中错误的是()。
点击查看答案
A．该过程的作用是弹出一个菜单
B．单击鼠标右键时弹出菜单
C．Menu0是在菜单编辑器中定义的弹出菜单的名称
D．参数X、Y指明鼠标当前位置的坐标
