在窗体中添加一个命令按钮，并编写如下程序代码：

程序运行后，消息对话框中显示______。

A．0

B．21

C．20

D．19

[单选题]在窗体画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入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 Lo

[单选题]在窗体上画一个命令按钮，然后编写如下过程，程序运行后，单击命令按钮，在输入对话框中输入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 L

[单选题]在通用声明中定义a，在窗体中添加一个命令按钮Command1，编写如下程序代码：D．imaAsIntegerSubtest()a=a+1:b=b+1:c=c+1Print"Sub:";a;"，";b;"，";cE．ndSubPrivateSubCommand1_Click()a=2:b=3:c=4C．alltestC．alltestE．ndSub程序运行后，单击命令按钮，窗体中将显示( )A．Sub：3，4，5Sub：4，5，6B．Su

[单选题]在窗体中添加一个命令按钮，并编写如下程序：Private Sub Command1_ Click() x=1: y=2: z=3 x=y: y=z: z=xEnd Sub程序执行后，输出的结果是______。A．3B．0C．2D．1

[单选题]在窗体上添加一个命令按钮和一个文本框，并在命令按钮中编写如下代码：PrivateSubCommand1_Click()a=1.2c=Len(Str( )+Space(10))Text1.Text=cE．ndSub程序运行后，单击命令按钮，在文本框中显示( )A．3B．8C．14D．10

[单选题]在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序运行后，输出结果为A．Sub：2 6 4 Main：2 6 4B．Sub：2 6 4 Main：2 6 4C．Sub：2

[单选题]在窗体中添加一个命令按钮，编写如下程序： Private Sub Test(p，m，n) p=p+1：m=m+1：n=n+1 Print "Sub: ";p；m；n End Sub Private Sub Command1.Click() a1=1：b=2：c1=3 Call Test((a，b1+3，(c1)) Print "Main："；a1；b1；c1 End Sub 程序运行后，输出结果为A．Sub： 2 6 4 Main： 2 6 4B．Sub： 2 6 4 Main： 2 6

[单选题]在窗体中添加一个列表框(ListBox1)和一个命令按钮，并编写如下代码： Private Sub Commandl_Click() Dim a, i, msg msg="Choose OK to add 100 items to your listbox." MsgBox msg For i＝l To 100 a="a：" &i ListAddltem a Next i End Sub 程序完成的功能是 ( )A．本程序使用Addltem方法增加100项给一个列表框B．本程序使

[单选题]在窗体中添加一个列表框(listBox1)和一个命令按钮，并编写如下代码：Private Sub Command1_ Click() Dim Entry, I, Msg Msg = "Choose Ok to add 100 items to your list box." MsgBox Msg for I = 1 To 100 Entry = "Entry" & I List1. AddItem Entry Next IEnd Sub程序完成的功能是______。A．本示例使用

[单选题]在窗体上画一个通用对话框，程序运行后，通过ShowOpen方法显示”打开”对话框，要求在该对话框的“文件类型”栏中只显示扩展名为.DOC的文件，则对通用对话框的 Filter属性的正确设置是： ______。A．(*.DOC)*.DOCB．(*.DOC)|(.DOC)C．(*.DOC)||*.DOCD．(*.DOC)|*.DOC