朋友，你的想法沒錯，打開通用對話框（CommonDialog），有兩種辦法，第一種就是你說的那種，：
“打開”對話框：Action = 1
“保存”對話框：Action = 2
“顏色”對話框：Action = 3
“字體”對話框：Action = 4
“打印”對話框：Action = 5
“幫助”對話框：Action = 6
另外一種方法如下:
“打開”對話框：ShowOPen
“保存”對話框：ShowSave
“顏色”對話框：ShowColor
“字體”對話框：ShowFont
“打印”對話框：ShowPrinter
“幫助”對話框：ShowHelp
舉個例子：CommonDialog1.Action = 1 可以替換為CommonDialog1.ShowOpen,依次類推，運行程序，你就知道了。
對了，通用對話框（Commondialog）在VB程序一般沒有，需要添加，請你從“工程”中選擇“部件”，來添加“Microsoft common Dialog Control”控件。
朋友，建議你使用第二種方法，祝你成功！

MSDN解釋：此 Action 屬性是為了與 Visual Basic 早期版本兼容而提供的。如需附加功能，可使用下列新方法：ShowColor，ShowFont，ShowHelp，ShowOpen，ShowPrinter 和 ShowSave。
也就是說，現(xiàn)在的VB版本把Action名義上淘汰了，用不著。但是Action有一個額外用處：如果Action=6，則運行 WINHLP32.EXE。

作用是一樣的，用后面的方法就不用設(shè)action屬性了。
其實action=1，系統(tǒng)就自動調(diào)出ShowOpen方法。

先設(shè)置好控件的屬性，再顯示對話框的話就不會有問題了。
把C1.ShowOpen放到最后就可以了。

比如：
C1.DialogTitle = "打開文件"
C1.Filter = "all files|*.*|(*.exe)|*.exe|(*.txt)|*.exe"
C1.Flags = 4
C1.FilterIndex = 2
C1.ShowOpen '最后再調(diào)用ShowOpen上面的屬性設(shè)置才有效，否則只顯示調(diào)用ShowOpen前的設(shè)置屬性