若将子过程SUB中的PRIVATE X改为PRIVATE Y,则X的输出结果为 ______。A.5B.11C.8D.3
若将子过程SUB中的PRIVATE X改为PRIVATE Y,则X的输出结果为 ______。
A.5
B.11
C.8
D.3
若将子过程SUB中的PRIVATE X改为PRIVATE Y,则X的输出结果为 ______。
A.5
B.11
C.8
D.3
假定在窗体中的通用声明段已经定义有如下的子过程: 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
A.private sub sort (a()as integer)
B.private sub sort(a(10) as integer)
C.private sub sort (byval a()as integer)
D.private sub sort (a(,) as integer)
假定有下拉两个过程:
Private Sub PPP(a As Single,b As Single)
a=a+b
Print a,b
b=a+b
Print a,b
End Sub
Private Sub Form_Activate()
x=18
Call PPP((x),(x))
Print x
End Sub
则下列说法中不正确的是()。
A.形参是a和b,两个实参(x)和(x)允许重名
B.形参是a和b,实参(x)表示传值调用
C.形参是a和b,实参(x)表示是非传址调用
D.形参是a和b,两个实参(x)和(x)不允许重名
在窗体上画一个文本框,然后编写如下事件过程:
Private Sub Form_Click()
Dim x As Integer
x = Val(InputBox("请输入一个整数"))
Print x + Text1.Text
End Sub
程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。
A.46
B.123
C.3412
D.1234
(26)设有下列过程: Private Sub ppp(As Single,b As Single) A=a+b Print a,b B=a+b Print a,b End Sub Private Sub Form_Activate() x=18 Call ppp ((x),(x)) Print x End Sub 则下列说法中不正确的是 A.形参是a和b,两个实参(x)和(y)允许重名 B.形参是a和b,实参(x)表示传值调用 C.形参是a和b,实参(x)表示是非传址调用 D.形参是a和b,两个实参(x)和(y)不允许重名
窗体上有一个命令按钮Command1,编写如下事件过程:
Private Sub Command1_Click()
x = InputBox("x=")
y = InputBox("y=")
Print x + y
End Sub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是()。
A、 444
B、 123321
C、 123+321
D、 出错信息
窗体有命令按钮Commandl和文本框Textl,对应的事件代码如下:
Private Sub Commandl_Click()
For i=1 To 4
x=3
For j=l to 3
For k=1 To 2
x=x+3
Next k
Next j
Next i
Textl.Value=Str(x)
End Sub
运行以上事件过程,文本框中的输出是()。
A.6
B.12
C.18
D.21
在窗体上画一个文本框,然后编写如下事件过程: Private Sub Form_Click() x=InputBox(“请输入一个整数”) Print x+Text1.Text End Sub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为
A.123
B.456
C.579
D.123456
假定有如下事件过程: Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu popForm End If End Sub 则以下描述中错误的是
A.该过程的功能是弹出一个菜单
B.PopForm是在菜单编辑器中定义的弹出式菜单的名称
C.参数X、Y指明鼠标的当前位置
D.BuRon=2表示按下的是鼠标左键
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox("请输入A的值") a=Val(A) b=InputBox("请输入B的值") b=Val(B) x=InputBox("请输入x的值") x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后,单击命令按钮,依次在输入对话框中输入5、4、3、2、1、-1,则输出结果为______。
A.2
B.3
C.14
D.15