维生素e可以每天涂脸吗:亡羊补牢 请高手帮忙{commonDialog}

来源:百度文库 编辑:神马品牌网 时间:2024/05/13 11:01:17
用commonDialog "另存为"保存文件,如何辨别现输入的文件名是否与该路径下的文件同名,并做出提示.(不然,它会覆盖,麻烦大了),请各位指点迷津!希望附上代码.

Do
CommonDialog1.showsave
If Len(Dir(CommonDialog1.FileName)) < 1 Then Exit Do
If MsgBox("文件已存在,覆盖吗?", vbYesNo) = vbYes Then Exit Do
Loop