Private Sub Command1_Click()

CommonDialog1.FileName=“”

CommonDialog1.Filter=“All file|*.*|(*.Doc)|*.Doc|(*.Txt)|*.Txt ”CommonDialog1.FilterIndex=1

CommonDialog1.DialogTitle=“VBTest”

CommonDialog1.Action=1

End Sub

对于这个程序，以下叙述中错误的是()。

A.该对话框被设置为“打开”对话框

B.在该对话框中指定的文件名为空

C.该对话框的标题为VBTest

D.在该对话框中指定的默认文件类型为文本文件(*.Txt)