求助关于打开文件的问题！！

Question

我想用代码打开一个对话框，此对话框中只包括我想要的扩展名的文件，比如只有.dat或者只有.txt的文件，该怎么写？？是用getfilenamefilter吗？如果是，怎么用啊？代码怎么写啊？？谢谢！

Answer 1

Private Sub Command1_Click()
On Error GoTo Err
CommonDialog1.CancelError = True
    CommonDialog1.Filter = "dat(*.dat)|*.dat|txt(*.txt)|*.txt"
    CommonDialog1.ShowOpen
    '...
Err:
    If Err.Number = 32755 Then
        MsgBox "你按了取消!", vbCritical, "系统提示"
    End If
End Sub

Answer 2

呵呵，李洪根除了Copy/Paste也会点别的？