看这个（重点）选

有如下的程序: Private Sub Command1_Click() a=1:b=2:c=3 Call test(a,b+3,(c)) Print "main:";a;b;c End Sub Private Function test(p,m,n) p=p+1:m=m+1:n=n+1 Print"Sub:";p;m;n End Function 当运行程序后,单击命令按钮 Command1 ,显示的结果是________。

发布于 2021-03-23 11:37:09

【单选题】
A sub:2 6 4 main:1 6 4
B sub:2 6 4 main:2 6 4
C sub:2 6 4 main:1 2 3
D sub:2 6 4 main:2 2 3

关注者

0

被浏览

58

谦陌 2023-03-23

这家伙很懒，什么也没写！

此回答被采纳为最佳答案，开通VIP会员可查看

1 个回答

撰写答案

请登录后再发布答案，点击登录

关于作者

🐬旭洋

这家伙很懒，什么也没写！

提问

回答

708

被采纳

646

关注TA

发私信

相关问题

1

设已定义函数过程 f,它有三个整型数值参数,再设 a, b 和 c 为实型变量,则调用该函数过程使用的语句为___ _____。

2

通用过程可以通过执行"工具"菜单中的_____ ___命令来建立。

3

有如下程序: Private Sub Form_Click() Dim a As Integer, b As Integer a = 10: b = 20 Call pl(a,b) Print "a="; a; "b="; b End Sub Private Sub pl(ByVal x As Integer, y As Integer) x = 5 y = x + y End Sub 程序运行时,单击窗体后,窗体上显示的值是________。

4

有如下程序: Private Sub Form_Click() a=1:b=2:c=3 Call ss(a,b,c) Print a; b; c End Sub Private Sub ss( ByVal x , ByRef y , z ) x=x+1: y=y+1: z=z+1 End Sub 程序运行后,单击窗体,则输出的结果是________。

5

设有如下两个过程: Private Sub Form_Click() Dim x$,y! x = 18: y = 10 Call PPP((x), y) Print x,y End Sub Private Sub PPP(a As Single, b As Single) a = a + b Print a,b b = a + b Print a,b End Sub 运行程序后, 则输出结果是________。

6

编写如下事件过程: Private Sub Command1_Click() a%=10 b%=5 Change a,b Print a,b End Sub Private Sub Change(ByVal a As Integer,b As Integer) Dim Tmp As Integer Tmp=a a=b b=tmp End Sub 该程序运行后,单击命令按钮 Command1 ,输出的结果是________。

7

在过程的定义中,使用关键字_____ ___来修饰形式参数,可以使之按地址传递。

8

在过程的定义中,使用关键字_____ ___来修饰形式参数,可以使之按值传递。

9

设有以下函数过程: Function fact(n As Long) If n = 1 Then fact = 1 Else fact = n * fact(n - 1) End If End Function 在窗体上画一个命令按钮和两个文本框,然后编写如下事件过程: Private Sub Command1_Click() Dim n As Long, result As Long n = Val(Text1.Text) result = fact(n) Text2.Text = Str(result) End Sub 程序运行时,如果在文本框 Text1 中输入数据 5 后,单击命令按钮 Command1 ,则在文本框 Text2 上输出的结果为________。

10

以下描述中,正确的是______ __。

发布
问题

手机
浏览

扫码手机浏览

在线
客服