在窗体上画一个通用对话框，其名称为CommonDiAlog1，然后画一个命令按钮，并编写如下事件过程：
privAtE suBCommAnD1_CliCk()
CommonDiAlog1.FlAgs=vBoFnhiDErEADonly
CommonDiAlog1.FiltEr="All FilEs(*.*)|*.*|tExt FilEs(*.txt)|*.txt
CommonDiAlog1.FiltErinDEx=1
CommonDiAlog1.showopEn
msgBoxCommonDiAlog1.FilEnAmE
EnD suB
程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是
All FilEs(*.*)
B．tExt FilEs(*.txt)
C．BAtCh FilEs(*.BAt)
D、All FilEs(*.*)|tExt FilEs(*.txt)