第1题:
单击命令按钮时,下列程序的执行结果为 Private Sub Command1_Click() Dim a As Integer,b As Integer,c As Integer a=2:b=3:C=4 Print P2(c,b,A)End Sub Private Function P1(x As Integer,y As Integer,z As Integer) P1=2 * X + y + 3 * z End Function Private Function P2(x As Integer,y As Integer,z As Integer) P2=P1(z,x,y) + X End Function
A.21
B.19
C.17
D.34
第2题:
单击一次窗体之后,下列程序代码的执行结果为______。 Private Sub Command1_ Click() Dim a As Integer, b As Integer, c As Integer a = 1: b = 2: c = 4 Print Value(a, b,C)End Sub Function Num(x As Integer, y As Integer, z As Integer) Num = x * x + y * y + z * z End Function Function Value(x As Integer, y As Integer, z As Integer) Value = Num(x, y, z) + 2 * x End Function
A.21
B.23
C.19
D.35
第3题:
单击命令按钮时,下列程序的执行结果为
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a=2: b=3: c=4
Print P2(c, b, A.
End Sub
Private Function P1(x As Integer, y As Integer, z As Integer)
P1=2 * x + y + 3 * z
End Function
Private Function P2(x As Integer, y As Integer, z As Integer)
P2=P1(z, x, y) + x
End Function ( )。
A.21
B.19
C.17
D.34
第4题:
Q4 :
int iVal1 = 0, iVal2 = 0;
int * ipVal;
ipVal = &iVal1; What is the Value of ipVal = *ipVal =
ipVal = (int*)iVal1; What is the Value of ipVal = *ipVal =
iVal2 = (int)&iVal1; What is the Value of ipVal = *ipVal =
第5题:
以下程序运行后,单击命令按钮,窗体显示的结果是 ______。 Private Function p1(x As Integer,y As Integel,z As Integer) p1=2*x+y+3*z End Function Private Function p2(x As Integer,y As Integer,z As Integer) p2=p1(2,y,x)+x End Function Private SubCommandl_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2:b=3:c=4 Print p2(c,b,A)
End Sub
A.19
B.21
C.22
D.23
第6题:
单击命令按钮时,下列程序代码的执行结果为 ( ) Function FirProc(x As Integer, y As Integer, z As Integer) FirProc=2*x+y+3*z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc=FirProc(z, x, y)+x End Function Private Sub Commandl Click() Dim a As Integer, b As Integer, c As Integer a=2 :b=3 :c=4 Print SecProc(c, b,A)End Sub
A.21
B.19
C.17
D.34
第7题:
单击一次命令按钮,下列程序代码的执行结果为( )。 Private Sub Commandl_Click() Dima As Integer,b As Integer,CASInteger a=2:b=3:c=4 PrintP2(c,b,A) End Sub PrivateFunctionPl(X As Integer,y As Intege;z As Integer) P1=2*x+y+3*Z End Function Priva
A.21
B.19
C.17
D.34
第8题:
下列程序运行后,单击命令按钮,窗体显示的结果为( )。 Private Function pl(x As Integer,y As Integer,z As Integer) pl=2*x+y+3*z End Function Private Function p2(X As Integer,y As Integer,z As Integer) p2=p1(z,y,x)+x End Function Private Sub Commandl_Click()
A.23
B.19
C.21
D.22
第9题:
Q2 : Declare Function Multiply_Add Lib “test” (ByRef A as integer ,VeRef B as integer , ByVal c as integer ) as integer
Q2.1: Explain what is Declare Function used for ?
Ans :
Q2.2 : Explain the difference between ByRef and ByVal ?
Ans :
第10题:
下列程序的执行结果为 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 12 20 15
B.12 20 12 25
C.24 15 12 20
D.24 12 12 15