Question

在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：

在窗体上画一个名称为CommonDialog1的通用对话框，一个名称为Command1的命令按钮。然后编写如下事件过程：
Private Sub Command1_Click()
CommonDialog1.FileName =""
CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialog1.FilterIndex=2
CommonDialog1.DialogTitle="VBTest"
CommonDialog1.Action=1
End Sub
对于这个程序，以下叙述中错误的是______。
A：在该对话框中指定的默认文件类型为文本文件(*.Txt)
B：在该对话框中指定的默认文件名为空
C：该对话框的标题为VBTest
D：该对话框被设置为"打开"对话框
参考答案：A

9、在窗体上画一个通用对话框，其名称为CommonDialog1，然后画一个命令按钮，并编写如下事件过程：
Private Sub Command1_Click()
CommonDialog1.Filter="All Files(*.*)|*.*|Text Files" &_
"(*.txt)|*.txt|Executable Files(*.exe)|*.exe"
CommonDialog1.FilterIndex=3
CommonDialog1.ShowOpen
MsgBox CommonDialog1.FileName
End Sub
程序运行后，单击命令按钮，将显示一个"打开"对话框，此时在"文件类型"框中显示的是______。
A：Text Files(*.txt)
B：AllFiles(*.*)
C：Executable Files(*.exe)
D：不确定
参考答案：C

4、在窗体上画一个名为Command1的命令按钮，然后编写如下代码：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4 To 1 Step -1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，其输出结果是______。
A：12
B：1234
C：34
D：4321

22、在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：
Private Sub Command1_Click()
a = InputBox("Enter an integer")
b = InputBox("Enter an integer")
Text1.Text = b + a
End Sub
程序运行后，单击命令按钮，如果在输入对话框中分别输入8和10，则文本框中显示的内容是______。
A：出错
B：18
C：810
D：108

参考答案：D 注：b与a为字符串 当两个都为字符串时，+为字符串的拼接符。

请详细解释怎么会选那些答案。

Answer 1

第一题
CommonDialog1.FilterIndex=2
0,1,2
所以刚好是第三个 文本文件(*.Txt)
所以选A

第二题
CommonDialog1.FilterIndex=3
因为共只有2
顾只能选最后一个
所以选C

第三题
4+30+200+1000=1234
所以选B

第三题
b="10"
a="8"
b+a=108
所以选d

追问

第一题： CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialog1.FilterIndex=2
这两句有什么关系？ 到底是哪一句起作用？

第三题能再详细一点么。谢谢。

追答

第一题： CommonDialog1.Filter="All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt"
CommonDialog1.FilterIndex=0 其实相当于 All file|*.*
CommonDialog1.FilterIndex=1 其实相当于 (*.Doc)|*.Doc
CommonDialog1.FilterIndex=1 其实相当于 (*.Txt)|*.Txt"

第三题
a = InputBox("Enter an integer")
a,b 没有定义 默认为字符
b="10"
a="8"
b+a=108 所以是两个字符相连 而不是整数相加
所以选d

追问

八好意思。。我说的第三题是1234那一题。。。

追答

哦哦

4+30+200+1000=1234

j=1 a(4)=4 4*1=4
j=j*10=1*10=10 a(3)*j=3*10=30
j=j*10=10*10=100 a(2)*j=2*100=200
j=j*10=100*10=1000 a(1)*j=1*1000=1000

4+30+200+1000=1234