niusouti.com
在窗体上画一个命令按钮，名称为Commandl，然后编写如下程序：Privme Sub Commandl_Click()Dim intNum As IntegerintNum＝InputBox(“请输入：”)MsgBox f(intNum)End SubFunction f(X As Integer) As Integerf＝IIf (X<10,X,X+5)End Function运行程序，单击命令按钮，在输入对话框中输入5，则程序的输出结果为______。
题目
在窗体上画一个命令按钮，名称为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，则程序的输出结果为______。
相似考题
更多“在窗体上画一个命令按钮,名称为Commandl,然后编写如下程序:Privme Sub Commandl_Click()Dim intN ”相关问题
-
第1题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。A. 机床
B. 车床
C. 钻床
D. 轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的a(2)就是数组的第三个元素即“钻床”。
-
第2题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： PrivateSubCommandl_CnCk() aS="VisualBasic"， Print String(3,a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是( )。
A．VVV
B．Vis
C．sic
D．11
正确答案：A
-
第3题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（） Dim（） a=Array（”机床”，”车床”，”钻床”，”轴承”）Printa（2）EndSub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A.机床
B.车床
C.钻床
D.轴承
正确答案：C
暂无解析，请参考用户分享笔记 -
第4题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是
A．VVV
B．Vis
C．sic
D．11
正确答案：A
解析：本题考查字符串函数。 String返回n个字符。如果为字符串，则返回n个字符串的首字符。据此，本题的正确答案为A，即返回3个“Visual Basic”的首字母“V”。 -
第5题：
在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程：
程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。
A)机床
B)车床
C)钻床
D)轴承
正确答案：C
本题考查VBA中数组的知识。数组变量由变量名和数组下标构成，我们通常使用Dim语句来定义数组，其中下标下限缺省为0。本题中的af2)就是数组的第三个元素即“钻床”。 -
第6题：
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：
程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。
正确答案：
9【解析】本题考查多分支语句SelectCase的知识。SelectCase用于实现多分支结构，其使用格式为：
其功能是根据“测试表达式”的值，从多个语句块中选择符合条件的一个语句块执行.如果测试表达式的值等于某一个表达式的值，则选择该语句块的语句执行，执行完毕后退出Case结构。本题中由于x的值为3，符合第一个Case语句的条件，所以执行y=x*x后退出Case结构，最后Y的值为9。