单击窗体时，下列程序代码的执行结果为______ 。 Private Sub Test (x As Integer) x=x*2+1 If x ＜ 6 Then Call Test(x) End If x-x*2+1 Print x; End Sub Private Sub Command1_ Click () Test 2 End SubA．23 47B．5 11C．10 22D．23 29
单击窗体时，下列程序代码的执行结果为______ 。 Private Sub Test (x As Integer) x=x*2+1 If x ＜ 6 Then Call Test(x) End If x-x*2+1 Print x; End Sub Private Sub Command1_ Click () Test 2 End Sub
A．23 47
B．5 11
C．10 22
D．23 29
相关考题：
设有如下窗体单击事件过程：Private Sub Form Click( )x=1For i=1 To 3Select Case ICase 1,3x=x+3Case 2,4x=x-2End SelectNext IMsgBox xEnd Sub打开窗体运行后，单击窗体，则消息框的输出结果是______。
下列程序的运行结果是【 】。 include class test { private: int num; public: tes 下列程序的运行结果是【 】。include ＜iostream. h＞class test{private:int num;public:test()int TEST() {return num+100;}～test()};test::test(){num=0;}test::～test(){cout＜＜"Destructor is active"＜＜endl;}void main(){test x[3]cout＜＜x[1]. TEST()＜＜endl;}
下列程序的运行结果是______。 include class test { private: int hum; public: tes 下列程序的运行结果是______。include＜iostream.h＞class test{private:int hum;public:test( );int TEST( ){return num+100;)～test( );};test::test( ){num=0;)test::～test( ){cout＜＜"Destructor is active"＜＜endl;)void main( ){test x[3];cout＜＜x[1].TEST( )＜＜endl;}
单击命令按钮时，下列程序代码的执行结果为 ( ) 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 SubA．21B．19C．17D．34
单击窗口时，下列程序代码的执行结果为 Private Sub Form_Click( ) Text1 End Sub Private Sub Text(x As Integer) x=x*3+1 if x＜6 Then call Text(x) End if x=x*2+1 Print x； End SubA．27 55B．11 35C．22 45D．24 51
单击一次窗体之后，下列程序代码的执行结果为______。 Private Sub Command1_ Click() Dim x As Integer, y As Integer, z As Integer x = 1: y = 2: z = 3 Call fun1 (x, y, z) Print x; y; z Call fun2(x, y, z) Print x; y; z End Sub Private Sub fun1(x As Integer, y As Integer, z As Integer) x = 10 * z y=z*z+ x z=x+ y+ z End Sub Private Sub fun2 (ByVal x As Integer, ByVal y As Integer, ByVal z As Integer) x=10*z y=z*z+ x z=x+ y +z End SubA．1 2 3 30 39 72B．1 2 3 1 2 3C．30 39 72 1 2 3D．30 39 72 30 39 72
单击一次窗体之后，下列程序代码的执行结果为______。 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 FunctionA．21B．23C．19D．35
运行下列程序:Dim bPrivate Sub Form_Click( )a = 1: b = 1Call fun1(a)Print "X = X = ; a; ,Y = ; bEnd SubPrivate Sub fun1(a)b = 2 * aa = 3 * bEnd Sub单击窗体后，则在窗体上显示的结果是( )。A.X = 1，Y = 1B.X = 2，Y = 6C.X = 6，Y = 2D.X = 6，Y = 1
单击窗体时，下列程序代码的运行结果为（）。 Private Sub Test（x As Integer) x = x * 2 + 1 If x ＜ 6 Then Call Test（x) End If x = x * 2 + 1 Print x; End Sub Private Sub Form_Click（) Test 2 End SubA．5 11B．23 47C．10 22D．23 23