在窗体上画一个命令按钮，然后编写如下程序(假定变量x是—个窗体级变量)Dim x As IntegerSub inc(a AS Integer)X=K+aEnd SubPrivate Sub Command1_Click()inc2inc3inc4Prmt x；Ead Sub程序执行后，单击Command1命令按钮，输出的结果是【 】。
题目
在窗体上画一个命令按钮，然后编写如下程序(假定变量x是—个窗体级变量)
Dim x As Integer
Sub inc(a AS Integer)
X=K+a
End Sub
Private Sub Command1_Click()
inc2
inc3
inc4
Prmt x；
Ead Sub
程序执行后，单击Command1命令按钮，输出的结果是【 】。
相似考题
更多“在窗体上画一个命令按钮,然后编写如下程序(假定变量x是—个窗体级变量) Dim x As Integer Sub inc ”相关问题
-
第1题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下程序：
Privme Sub Commandl_Click()
Dim intNum As Integer
intNum＝InputBox(“请输入：”)
MsgBox f(intNum)
End Sub
Function f(X As Integer) As Integer
f＝IIf (X<10,X,X+5)
End Function
运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。
正确答案：5
5 解析： 本题考查IIf函数和函数调用的知识。本题中调用函数f(intNum) ，也就是将intNum的值5传给形参X；IIf函数可用于执行简单的条件判断操作，此函数有3个参数，当第一个参数为真时返回第二个参数值，否则返回第三个参数值。因为X<10为真，所以返回并输出的值也就是5。 -
第2题：
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A．
B．H
C．
D．
正确答案：A
【解析】分析程序，程序开始循环时i=1，j=1to1，PrintSUing(i，“Hello”)语句输出一个H，然后执行Print进行换行；当i=2时，j=1to2，PrintString(i，“Hello”)语句输出两行分别为两个HH，然后执行Print换行：当i=3时，退出循环。 -
第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题：
在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Pnvate Sub Command1_Click() Dim x As Integer，y As Integer，t As Integer x=10：y=20：t=0 If x=y Then t=x：x=y：y=t Print x；y End Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A．10 20
B．20 0
C．20 10
D．20 20
正确答案：A
解析：发生Command1的单击事件时，首先定义了三个变量x、y和t，并给它们赋值为10、20和0，然后判断Ⅱ后面的条件“x=y”为False，将不再执行Then后面的语句。此处需注意的是，用“:”分开的若干条语句要作为一个整体，要么都执行，要么都不执行，所以该题Then后面的三条语句都不执行。因此输出的x和y的值还是10和20。 -
第5题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A.机床
B.车床
C.钻床
D.轴承
正确答案：C
暂无解析，请参考用户分享笔记