单项选择题

单击一次窗体之后，下列程序代码的执行结果为______ 。 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

<上一题目录下一题>

热门试题

单项选择题

单击一次窗体之后，下列程序代码的执行结果为______ 。 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 Sub

A．1 2 3 30 39 72
B．1 2 3 1 2 3
C．30 39 72 1 2 3
D．30 39 72 30 39 72

单项选择题

单击一次命令按钮之后，下列程序代码的执行结果为______ 。 Private Sub Command1_ Click() a = fun(4) + fun(5) Print a; End Sub Public Function fun (n As Integer) Static Num For i = 1 To n Num = Num + i Next i fun = Num End Function

A．15
B．20
C．35
D．40

相关试题