在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。 Function fun(ByVal num As Long) As Long Dim k As Long k=1 mum=Abs(num) Do While num k=k*(num Mod 10) num=num\10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n
题目
在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。 Function fun(ByVal num As Long) As Long Dim k As Long k=1 mum=Abs(num) Do While num k=k*(num Mod 10) num=num\10 Loop fun=k End Function Private Sub Command1_Click() Dim n As Long Dim r As Long n=InputBox("请输入一个数") n=CLng(n) r=fun(n) Print r End Sub
A．20
B．24
C．9
D．28
相似考题
更多“在窗体上画一个命令按钮,然后编写如下过程,程序运行后,单击命令按钮,在输入对话框中输入234,输出 ”相关问题
-
第1题：
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后，单击命令按钮，在输入对话框中输入123，则在窗体上输出的内容为( )
A．123345
B．468
C．123
D．345
正确答案：B
解析：InputBox函数返回的是字符串类型值，故x应为字符串类型。执行语句Print x+345时，x的类型自动转换为整型。相当于执行了123、345两数的和，故窗体上的输出内容为468。 -
第2题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
程序运行后，单击命令按钮，将显示一个输入对话框，如果在对话框中输入25，则程序的执行结果是（ ）。A. 输出0
B. 输出25
C. 输出45
D. 无任何输出
正确答案：D
D) 【解析】本题考查VB程序的执行特点。程序执行时，布尔型变量SW默认为False，单击命令按钮后弹出对话
框，在该对话框中输入25之后，始终没有在窗体上单击鼠标，因而没有改变SW的值，所以没有进行fun函数过程的调用，也就无
任何输出。
-
第3题：
在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click( )
a=Val(1nputBox(“请输入一个整数”))
b=Val(1nputBox(“请输入一个整数”))
Print a+b
End Sub
程序运行后，单击命令按钮，在输入对话框中分别输入12和34，输出结果为【 】
正确答案：46
46 解析：InputBox函数返回的数据类型默认为字符串类型。Val(x)函数表示把变量x转换为数值。本题要求通过InputBox函数分别输入两个数据，并同时被转换为数值，再相 -
第4题：
在窗体上画一个命令按钮，名称为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。 -
第5题：
在窗体上画一个命令按钮，然后编写如下时间过程（ ）。
程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是A. 579
B. 123
C. 456
D. 123456
正确答案：D
D) 【解析】InputBox函数返回的是字符串格式的用户输入的数据，因此本题中，最后变a和变量b中存储的是字符串’456’和’123’，因此表达式b+a，就是将这两个字符串连接起来，称为字符串’123456’。
-
第6题：
在窗体上有一个命令按钮，然后编如下事件过程：
程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 。
正确答案：
-1的平方根是一个虚数
【解析】在Sub过程中，定义了一个Double型变量N，并调用InputBox函数，给N赋值，即将从对话框中输入的-1赋给N；通过运算符”&”，将N与字符串”的平方根”连接起来并赋给Msg；在条件块语句中将N作为参数，调用SR事件过程，将Function过程的返回值作为测试表达式；在SR函数中，调用Sgn函数测试x的值为正数还是负数，如果是正数，那么就执行条件块语句中的SR=Sqr(x)，即将X的平方根作为返回值，如果x值为零，Sgn函数返回值为零，那么就将0作为返回值；如果为负数。Sgn函数返回值为-1，SR=-1，即将-1作为返回值；在Sub程序的条件块语句中，根据SR返回值的不同，执行不同操作，当返回值为0，将Msg字符串加”是0”，赋给Ms9，如果是-1，将Msg加”是一个虚数”赋给Msg，当为其他时，即在平方根时，将字符串Msg加”是”，再加上这个数的平方根赋给Msg，并用MsgBox函数输出。