更多"设有如下过程: Sub ff(x,y,Z,) x=y+z E"的相关试题:
[单项选择]设有如下过程:
Sub ff(x,y,z,)
x=y+z
End Sub
以下所有参数的虚实结合都是传址方式的调用语句是( )。
A. Call ff(5,7,z)
B. Call ff(x,y,z)
C. Call ff(3+x,5+y,z)
D. Call ff(x+y,x-y,z)
[单项选择]设有如下过程;
Sub ff(x,y,z)
x=y+Z
End Sub
下列选项中所有参数的虚实结合都是传址方式调用的是( )。
A. Call ff(5,7,2)
B. Call ff(x,y,z)
C. Call ff(3+x,5+y,z)
D. Call ff(x+y,x-y,z)
[单项选择]设有下列过程:
Sub ff(x,y,z)
x=y+z
End Sub
下列选项中所有参数的虚实结合都是传址方式调用的是( )。
A. Call ff(5,7,z)
B. Call ff(x,y,z)
C. Call ff(3+x,5+y,z)
D. Call ff(x+y,x-y,z)
[单项选择]设有如下过程:
Sub ff(x,y,z,)
x=y+z
End Sub
以下所有参数的虚实结合都是传址方式的调用语句是
A. Call ff(5,7,z)
B. Call ff(x,y,z)
C. Call ff(3+x,5+y,z)
D. Call ff(x+y,x-y,z)
[单项选择]End Sub
A. Pfivate Sub Commgld1_LClick()
B. Private Sub Command1_Click()
C. Pfivate Sub Command1_ C1ick()
D. Private Sub Command1_C1ick()
[单项选择]有如下事件过程:
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. 显示错误信息
[单项选择]在子过程Sub…End Sub中使用的形式参数可以是( )。
A. 常数、简单变量、数组变量和运算式
B. 简单变量、数组变量和数组元素
C. 常数、简单变量、数组变量
D. 简单变量、数组变量和运算式
[单项选择]
在代码中定义了一个子过程:
Sub P(a,b)
End Sub
下列调用该过程的形式中,正确的是()。
A. Call P
B. Call P(10,20)
C. P(10,20)
D. Call p 1O,20
[单项选择]在代码中定义了一个子过程:
Sub P(a,B)
...
End Sub
下面 ______ 调用该过程的格式是正确的。
A. Call P
B. Call P10,20
C. Call P(10,20)
D. P(10,20)
[单项选择]设有如下通用过程:
Public Function Fun(xStr As String) As String
Dim tStr As String,strL As Integer
tStr=" "
strL=Len(xStr)
i=1
Do While i<=strL/2
tStr=tStr& Mid(xStr,i,1)&Mid(xStr,strL-i+1,1)
i=i+1
Loop
Fun=tStr
End Function
在窗体上画一个名称为Command1的命令按钮。然后编写如下的事件过程:
Private Sub Command1_Click( )
Dim S1 As String
S1="abcdef"
Print UCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,输出结果是______。
A. abcdef
B. AFBECD
C. ABCDEF
D. DEFABC
[单项选择]设有如下事件过程:
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
If Button=2 Then
PopupMenu popMenu
End If
End Sub
则以下描述中错误的是( )。
A. 该过程的功能是弹出一个菜单
B. popMenu是在菜单编辑器中定义的弹出式菜单的名称
C. 参数X、Y指明鼠标的当前位置
D. Button=2表示按下的是鼠标左键
[单项选择]设有如下过程:
X=1
Do
x=x+2
Loop Until______
运行程序,要求循环体执行3次后结束循环,空白处应填入的语句是
A. x<=7
B. x<7
C. x>=7
D. x>7
[单项选择]设有如下通用过程:
Public Function Fun(xStr As String)As String
Dim t Str As String,strL As Integer
tStF=" "
strL=Len(xStr)
i=1
Do While i<=strL/2
tStr=Tstr&Mid(xStr,i,1)&Mid(xStr,strL-i+1,1)
i=i+l
Loop
Fun=tStr
End Function
在窗体上画一个名称为Command1的命令按钮,然后编写如下的事件过程:
Private Sub Command1_Click( )
Dim S1 As String
S1="abedef"
Prim UCase(Fun(S1))
End Sub
程序运行后,单击命令按钮,输出结果是( )
A. ABCDEF
B. abcdef
C. AFBECD
D. DEFABC
[单项选择]设有如下过程:
x=1
Do
x=x+2
Loop Until ______
运行程序,要求循环体执行3次后结束循环,空白处应填入的语句是( )。
A. x<=7
B. x<7
C. x>=7
D. x>7
[单项选择]设有如下窗体单击事件过程:
Private Sub Form_Click( )
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+1
Case 2,4
a=a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后,单击窗体,则消息框的输出的结果是( )。
A. 3
B. 4
C. 5
D. 6
[单项选择]
设有如下窗体单击事件过程:
Private Sub Form _Click( )
a=1
For i=1 To 3
Select Case i
Case 1,3
a=a+1
Case 2, 4
a=a+2
End Select
Next i
MsgBox a
End Sub
打开窗体运行后,单击窗体,则消息框的输出的结果是()。
A. 3
B. 4
C. 5
D. 6