单选题
单击命令按钮时，下列程序段的执行结果是（ ）。
单击命令按钮时，下列程序段的执行结果是（ ）。
Private Sub Commandl Click（）
Di ma As Integer ，b As Integer ，c As Integer
a＝2：b ＝4：c ＝6
Call Sl（a，b）
Print ＂a＝＂；a；＂b ＝＂；b ；＂c ＝＂；c
Call S2（a，b）
Print ＂a＝＂；a；＂b ＝＂；b ；＂c ＝＂；c ；
End Sub
Private Sub S1（x As Integer ，Y As Integer）
Di mc As Integer
x＝2＊x：y ＝y ＋2：c ＝x＋y
End Sub
Sub S2（x As Integer ，ByVal Y As Integer）
Di me As Integer x＝2＊x：Y ＝Y ＋2：e ＝x＋y
End Sub
发布于 2022-05-11 09:58:29
登录后免费查看答案
关注者
0
被浏览
31
1 个回答
推荐阅读
-
单击命令按钮时，下列程序段的执行结果是（ ）。Private Sub Command1 Click（ ）Dim a As Integer，b As Integer，C As Integera=2：b=4：c=6Call S1(a．b)Print"a="；a；"b="；b；"c="；cCall S2(a，b)Print"a="；a；"b="；b；"c="；c；End SubPrivate Sub S1(X．As Integer，Y As Integer)Dim C As Integerx=2*X：y=y+2：c=x+yEnd SubSub S2(x As Integer，ByVal Y As Integer)Dim e As Integerx=2*x：Y=Y+2：e=x+yEnd Sub
2022-05-11 关注 0 浏览27 1答案
-
设有如下程序Private Sub Form_Click()Dim a As Integer, b As Integera = 20: b = 50p1 a, bp2 a, bp3 a, bPrint "a="; a, "b="; bEnd SubSub p1(x As Integer, ByVal y As Integer)x = x + 10y = y + 20End SubSub p2(ByVal x As Integer, y As Integer)x = x + 10y = y + 20End SubSub p3(ByVal x As Integer, ByVal y As Integer)x = x + 10y = y + 20End Sub该程序运行后，单击窗体，则在窗体上显示的内容是：a = ______ 和 b = ______ 。
2022-05-11 关注 0 浏览14 1答案
-
单击按钮时，以下程序运行后的输出结果是（ ）。Private Sub proc1（x As Integer ，y As Integer ，z As Integer）x＝3＊zy ＝2＊zz ＝x＋yEnd SubPrivate Sub Co mmand1＿Click（）Di mx As Integer ，y As Integer ，z As Integerx＝1：y ＝2：z ＝3Call proc1（x，x，z）Print x；x；z Call proc1（x，y ，y）Print x；y ；yEnd Sub
2022-05-11 关注 0 浏览26 1答案
-
单击按钮时，以下程序运行后的输出结果是Private Sub Command1_Click()Dim x As Integer, y As Integer, z As Integerx=1: y=2: z=3Call God(x, x, z)Print x; x; zCall God(x, y, y)Print x; y; yEnd SubPrivate Sub God(x As Integer, y As Integer, z As Integer)x=3 * z + 1y=2 * zz=x + yEnd Sub
2022-05-11 关注 0 浏览88 1答案
-
单击按钮时，以下程序运行后的输出结果是Private Sub proc1(x As Integer, y As Integer, z As Integer)x=3 * zy=2 * zz=x + yEnd SubPrivate Sub Command1_Click()Dim x As Integer, y As Integer, z As Integerx=1: y=2: z=3Call proc1(x, x, z)Print x; x; zCall proc1(x, y, y)Print x; y; yEnd Sub
2022-05-11 关注 0 浏览54 1答案
-
下列程序的执行结果为（ ）。Private Sub Co mmand1＿Click（）Di mx As Integer ，y As Integerx＝12：y ＝20Call Value（x，y）Print x；yEnd SubPrivate Sub Value（ByVal m As Integer ，ByVal n AsInteger）m＝m＊2：n ＝n －5Print m；nEnd Sub
2022-05-11 关注 0 浏览12 1答案
-
下列程序的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=12: y=20Call Value(x, y)Print x; yEnd SubPrivate Sub Value(ByVal m As Integer, ByVal n As Integer)m=m * 2: n=n - 5Print m; nEnd Sub
2022-05-11 关注 0 浏览14 1答案
-
单击命令按钮时，下列程序的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=50: y=78Call PPP(x, y)Print x; yEnd SubPublic Sub PPP(ByVal n As Integer, ByVal m As Integer)n=n ＼ 10m=m ＼ 10End Sub
2022-05-11 关注 0 浏览13 1答案
-
单击命令按钮时，下列程序的执行结果为Private Sub Command1_Click()Dim x As Integer, y As Integerx=12: y=32Call PCS(x, y)Print x; yEnd SubPublic Sub PCS(ByVal n As Integer, ByVal m As Integer)n=n Mod 10m=m Mod 10End Sub
2022-05-11 关注 0 浏览18 1答案
-
窗体上有两个文本框Textl、Text2以及一个命令按钮Commandl ，编写下列程序：Di mY As IntegerPrivate Sub Commandl＿Click（）Di m X As Integerx＝2Textl ．Text ＝p2（p1（X），Y）Text2．Text ＝pl（x）End SubPrivate Function pl（X As Integer）As Integerx＋x＋y∶y ＝x＋ypl ＝x＋yEnd FunctionPrivate Function p2（X As Integer ，Y As Integer）As Integerp2＝2＊x＋yEnd Function当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为（ ）。
2022-05-11 关注 0 浏览9 1答案
