当点击保存时,如果在"C:\"中有一个1.TXT文档,当我现在打开的文档也要保存在"C:\1.TXT",要怎么样去判断路径中有一个1.TXT了.还要弹出一个对话框是否要替代文档...
我用了CommonDialog,请版主指点下....谢谢

[[it] 本帖最后由 lyk997 于 2008-10-11 15:37 编辑 [/it]]

能给出源代码可以吗???

我现在就是用的这个,但不知要具体代码怎么写,请给出源代码可以吗?  谢谢了....

已解决了
分享下源代码,请高手们指点下是否有误...        
 Private Sub FileSave_Click()
    If bFirstSave = True Then
er:
        CommonDialog1.FileName = ""
        CommonDialog1.ShowSave
        strPath = CommonDialog1.FileName
        If strPath <> "" Then
          If Dir(strPath) <> "" Then
            If MsgBox(strPath & "此路径已存在是否要替代它!", vbYesNo + 64, "提示") = vbYes Then
                    Call sName
                    Open strPath For Output As #1
                        Print #1, Text1.Text
                    Close #1
                    bFirstSave = False
                    Form1.Caption = strName & " - 记事本"
                Else
                    GoTo er
                End If
            Else
                Call sName
                If strPath <> "" Then
                    Open strPath For Output As #1
                        Print #1, Text1.Text
                    Close #1
                    bFirstSave = False
                    Form1.Caption = strName & " - 记事本"
                End If
            End If
        End If
    Else
        Open strPath For Output As #1
            Print #1, Text1.Text
        Close #1
    End If
End Sub

谢谢版主的指点,现在能用CommonDialogs.Flags,谢谢了