看这个（重点）选

编写如下事件过程: 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 ,输出的结果是________。

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

【单选题】
A 5 10
B 5 5
C 10 10
D 10 5

关注者

0

被浏览

69

杜霄凡 2023-03-23

会修电脑

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

1 个回答

撰写答案

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

关于作者

阿邦

相互了解是朋友，相互理解是知己。

提问

回答

800

被采纳

738

关注TA

发私信

相关问题

1

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

2

有如下程序: 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 程序运行时,单击窗体后,窗体上显示的值是________。

3

有如下程序: 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 程序运行后,单击窗体,则输出的结果是________。

4

设有如下两个过程: 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 运行程序后, 则输出结果是________。

5

有如下的程序: 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 ,显示的结果是________。

6

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

7

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

8

设有以下函数过程: 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 上输出的结果为________。

9

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

10

设有下面的过程: Function Func(a As Integer,b As Integer) As Integer Static m As Integer, i As Integer i = 2 i = i + m + 1 m = i + a + b Func = m End Function 在窗体上添加一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim k As Integer, m As Integer, p As Integer k=4 : m=1 p=Func(k,m) Print p; p=Func(k,m) Print p End Sub 程序运行后,单击命令按钮 Command1 ,输出结果为________。

发布
问题

手机
浏览

扫码手机浏览

在线
客服