niusouti.com
在窗体上画一个命令按钮，然后编写如下程序：Dim x As IntegerSub inc(a As Integer)x=x+aEnd SubPrivate Sub Command1_Click()inc 2inc 3inc 4Msgbox x；End Sub程序执行后，单击Command1命令按钮，消息框显示结果是【 】。
题目
在窗体上画一个命令按钮，然后编写如下程序：
Dim x As Integer
Sub inc(a As Integer)
x=x+a
End Sub
Private Sub Command1_Click()
inc 2
inc 3
inc 4
Msgbox x；
End Sub
程序执行后，单击Command1命令按钮，消息框显示结果是【 】。
相似考题
更多“在窗体上画一个命令按钮,然后编写如下程序: Dim x As Integer Sub inc(a As Integer) x=x＋a End ”相关问题
-
第1题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() x=-5 If Sgn(x) Then y=Sgn(x^2) Else y=Sgn(x) End If Print y End Sub 程序运行后，单击命令按钮，其输出结果为 ______。
A．-5
B．25
C．-1
D．1
正确答案：D
解析：Sgn(number)函数的功能是返回number的正负号。如果number＞0，Sgn返回1；number=0，Sgn返回0；number0，Sgn返回-1。在本题中Sgn(-5)的返回值为-1，-1为真，所以执行y=Sgn(x^2)，返回1，所以y的值为1。 -
第2题：
在窗体上画一个命令按钮，然后编写如下程序： Private Sub Commandl_Click( ) Dim a AS Integer，b As Integer a=15 b=2 t N(a，B)End Sub Function N(x As Integer，y As Integer) As Integer N=IIf(x)y，x，y) End Function 程序运行后，单击命令按钮，输出结果为
A．1
B．2
C．15
D．8
正确答案：C
解析：事件过程N的作用是输出两个数中最大的，它调用了IIF函数，条件部分是(x〉y)，如果满足，那么N的值即为x的值，否则为y的值。在Sub过程中，定义了两个变量a，b，并赋给它们初值15，2，并调用Print函数，输出N(a，b)的值，因为x〉y，所以输出15。 -
第3题：
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click（）
x = -5
If Sgn（x） Then
y = Sgn（x ^ 2）
Else
y = Sgn（x）
End If
Print y
End Sub
程序运行后，单击命令按钮，窗体上显示的是（ ）。
A．-5
B．25
C．1
D．-1
正确答案：C
-
第4题：
在窗体上画一个命令按钮，然后编写如下程序。运行后，单击命令按钮，输出结果为 ( )。
Private Sub Command4_Click()
Dima As Integer,bASInteger
a=1
b=2
PrintN(a,b)
End Sub
Function N(X As Integer,yAsInteger)AsInteger
N=IIf(x＞y，x，y)
End Funcfion
A．
B．
C．
D．
正确答案：B
-
第5题：
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For i=1 To 4 X=4 For j=1 To 2 X=x+6 Next Next Print x End Sub 程序运行后，单击命令按钮，输出结果是
A．12
B．13
C．16
D．17
正确答案：C
解析：观察程序，由于每次执行外层循环时x都被重新赋值，因此只要看当i=4时，执行内循环所得到的结果就可以。