网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
有如下事件过程：
Private Sub Command1_Click（）
Dim m As Integer, n As Integer
m=2: n=1
Print "m="; m; "n="; n
Call TOD（m, n）
Print "m="; m; "n="; n
End Sub
Sub TOD（x, y）
x=x ^ 2
y=y ^ 3
End Sub
程序运行后，输出的结果为（ ）。
A．m＝2，n＝1
m＝1，n＝2
B．m＝2，n＝1
m＝4，n＝1
C．m＝1，n＝2
m＝1，n＝4
D．m＝1，n＝2
m＝2，n＝4
参考答案
更多 “ 有如下事件过程：Private Sub Command1_Click（）Dim m As Integer, n As Integerm=2: n=1Print "m="; m; "n="; nCall TOD（m, n）Print "m="; m; "n="; nEnd SubSub TOD（x, y）x=x ^ 2y=y ^ 3End Sub程序运行后，输出的结果为（ ）。A．m＝2，n＝1m＝1，n＝2B．m＝2，n＝1m＝4，n＝1C．m＝1，n＝2m＝1，n＝4D．m＝1，n＝2m＝2，n＝4 ” 相关考题
考题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim m As Integer, n As Integer, p As Integerm=3: n=5: p=0Call Y（m, n, p）Print Str（p）End SubSub Y（ByVal i As Integer, ByVal j As Integer, k As Integer）k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。A．4B．6C．8D．10
考题
有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print "m="；m；"n="；n Call TOD(m，n) Print "m="；m；"n="；n End Sub Sub TOD(x，y) x=x^2 y=y^3 End Sub 程序运行后，输出的结果为A．m=2，n=1 m=1，n=2B．m=2，n=1 m=4，n=1C．m=1，n=2 m=1，n=4D．m=1，n=2 m=2，n=4
考题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
考题
在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程： Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．4B．6C．9D．15
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )A．4B．6C．8D．10
考题
在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
考题
单击命令按钮后，下列程序代码的执行结果是______。Public Sub fun (a As Integer, b As Integer, c As Integer)Doa=b+ cn=n+1Loop While n ＞ 3End SubPrivate Sub command1_ click()Dim m As Integer, n As Integer, i As IntegerFor i = 0 To 2: m = n + 1: Next iFor i = 1 To 2: Call fun (m, n, i): Next iFor i = 0 To 3Print m;Next iEnd Sub
考题
在窗体上画一个命令按钮,然后编写如下事件过程。Private Sub Command1_Click()Dim m As Integer, n As Integer, p As Integerm=3: n=5: p=0Call Y(m, n, p)Print Str(p)End SubSub Y(ByVal i As Integer, ByVal j As Integer, k As Integer)k=i + jEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是A．4B．6C．8D．10
考题
(6）在窗体上有1个名称为Command 1的命令按钮，并有如下事件过程和函数过程：Private Sub Command 1_Click()Dim p As Integerp＝m(1）＋m(2)＋m(3）Print pEnd SubPrivate Function m(n As Integer) As IntegerStatic s As IntegerFor k＝1 To ns＝s＋1Nextm=sEnd Function运行程序，单击命令按钮Command 1的输出结果为【6】。
热门标签
最新试卷
