在窗体画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为 ______。 Function Fun(ByVal num As Long)As Long Dim k As Long k=1 num=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=

在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后，单击命令按钮，在输入对话框中输入123，则在窗体上输出的内容为( )

A．123345

B．468

C．123

D．345

在窗体画一个命令按钮，然后编写如下过程:

Function fun(ByVal num As Long)As Lone

Dim k As Long

k=1

num=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

程序运行后，单击命令按钮，在输入对话框中输入234，输出结果为【 】。

在窗体上画一个命令按钮，然后编写如下事件过程：

Private Sub Command1_Click( )

a=Val(1nputBox(“请输入一个整数”))

b=Val(1nputBox(“请输入一个整数”))

Print a+b

End Sub

程序运行后，单击命令按钮，在输入对话框中分别输入12和34，输出结果为【 】

在窗体上画一个命令按钮，名称为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，则程序的输出结果为______。

在窗体上画一个命令按钮，然后编写如下时间过程（ ）。程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是

A. 579

B. 123

C. 456

D. 123456

在窗体上有一个命令按钮，然后编如下事件过程：

程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 。