在窗体上画一个名称为commondialog1的通用对话框,一个名称为Command1的命令按钮。要求单击命令按钮时,打开一个保存文件的通用对话框。该窗口的标题为“Save”,缺省文件名为“SaveFile”,在“文件类型”栏中显示*.txt。能够满足上述要求的程序是( )
A.
Private Sub Command1_Click() CommonDialog1.FileName = "Savefile" CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 2 CommonDialog1.DialogTitle = "Save" CommonDialog1.Action = 2 End Sub
B.
Private Sub Command1_Click() CommonDialog1.FileName = "Savefile" CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 1 CommonDialog1.DialogTitle = "Save" CommonDialog1.Action = 2 End Sub
C.
Private Sub Command1_Click() CommonDialog1.FileName = " Save " CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 2 CommonDialog1.DialogTitle = " Savefile " CommonDialog1.Action = 2 End Sub
D.
Private Sub Command1_Click() CommonDialog1.FileName = "Savefile" CommonDialog1.Filter = "All files|*.*|(*.txt)|*.txt|(*.Doc)|*.Doc" CommonDialog1.FilterIndex = 1 CommonDialog1.DialogTitle = "Save" CommonDialog1.Action = 1 End Sub