CommonDialog控件，点击"文件类型"*.*不显示所有文件只显示文件夹和doc文件怎么设置？请教
Private Sub cmdopen_Click()
CommonDialog1.DialogTitle = "打开对话框"
CommonDialog1InitDir = "c:\"
CommonDialog1.Filter = "word文档(*.doc)|*.doc|文本文件(*.txt)|所有文件(*.*)|*.*"
CommonDialog1.FilterIndex = 1
Text1.Text = ""
CommonDialog1.ShowOpen
...

[[italic] 本帖最后由 apfjm 于 2007-12-27 09:04 编辑 [/italic]]

改成这个CommonDialog1.Filter = "word文档(*.doc)|*.doc|文本文件(*.txt)|*.TXT|所有文件(*.*)|*.*"

CommonDialog1InitDir = "c:\"
再把这句改成CommonDialog1.InitDir = "c:\"
加了一个点．
不加也能运行．不过打开的不是Ｃ盘.