单项选择题

下列程序的执行结果为( )。 　　 Private Sub Comrnandl_Click( ) 　　　　Dim p As Integer, q As Integer 　　　　p=12：q=20 　　　　Call Value(p, q) 　　　　Print p; q 　　 End Sub 　　 Private Sub Value(ByVal m As Integer, ByVal n As Integer) 　　　　m=m * 2: n=n - 5 　　　　Print m; n 　　 End Sub

A．20　1220　15
B．12　2012　25
C．24　1512　20
D．24　1212　15
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个命令按钮（其NAME属性为Command1），然后编写如下代码:Option Base 1Private Sub Command1_Click()Dim as = 0a = Array(1,2,3,4)；j = 1For i = 4 To 1 Step -1s = s + a(i) * jj = j * 10Next iPrint sEnd Sub运行上面的程序，单击命令按钮，其输出结果是（ ）。
A．4321
B．1234
C．34
D．12
单项选择题
有如下的程序：Private Sub Command1_Click( )Dim k As Integer，m As IntegerDim P As Integerk=4：m=1P=Pid(k，m) ：Print P；P=Pid(k，m) ：Print PEnd SubPrivate Function Pid(a As Integer，b As Integer)Static m As Integer，i As Integerm=5：i=2i=i + m + 1m=i + a + bPid=m 2End Function单击命令按钮后，输出结果为（ ）。
A． 标准模块也称程序模块文件，扩展名是.bas
B． 标准模块由程序代码组成
C． 标准模块只用来定义一些通用的过程
D． 标准模块不附属于任何一个窗体
相关试题