UC知道问个VB程序中使用Commodialog1保存路径的问题！！！
来源：百度知道 编辑：UC知道 时间：2024/05/11 14:08:13
我在程序中编写好了，如下：
CommonDialog1.FileName = "dxdmqzhjg"
CommonDialog1.Flags = &H2
CommonDialog1.DialogTitle = "保存权重"
CommonDialog1.InitDir = App.Path & "\dxdmzbqzhjsjg.txt"
里面的App.Path，就是相对路径，就可以保存到这个程序所在的文件夹下，可 是我在把整个文件夹拷贝到另一个盘下时，再运行程序，结果弹出的那个保存框，里面的路径还是我移动前程序所在的路径，不是现在的这个路径，我用F8调试，到达CommonDialog1.InitDir = App.Path & "\dxdmzbqzhjsjg.txt"，程序显示的App.Path正是移动后的盘符，可是弹出的不是，这是为什么，又知道的吗，谢谢。
具体错误描述如下：开始我的Vb的运行程序在（D：\程序）下面，我点保存，弹出的保存框的默认打开路径是（D：\程序）。然后我把整个程序拷贝到（E：\程序），再次点保存，结果弹出的保存框的默认打开路径仍然是（D：\程序）。然后我用F8追踪，发现Commondialog1.Initdir的显示是（E：\程序）《我认为这个是正确的》，可是弹出的确实（D：\程序）
CommonDialog1.FileName = "dxdmqzhjg"
CommonDialog1.Flags = &H2
CommonDialog1.DialogTitle = "保存权重"
CommonDialog1.InitDir = App.Path & "\dxdmzbqzhjsjg.txt"
里面的App.Path，就是相对路径，就可以保存到这个程序所在的文件夹下，可 是我在把整个文件夹拷贝到另一个盘下时，再运行程序，结果弹出的那个保存框，里面的路径还是我移动前程序所在的路径，不是现在的这个路径，我用F8调试，到达CommonDialog1.InitDir = App.Path & "\dxdmzbqzhjsjg.txt"，程序显示的App.Path正是移动后的盘符，可是弹出的不是，这是为什么，又知道的吗，谢谢。
具体错误描述如下：开始我的Vb的运行程序在（D：\程序）下面，我点保存，弹出的保存框的默认打开路径是（D：\程序）。然后我把整个程序拷贝到（E：\程序），再次点保存，结果弹出的保存框的默认打开路径仍然是（D：\程序）。然后我用F8追踪，发现Commondialog1.Initdir的显示是（E：\程序）《我认为这个是正确的》，可是弹出的确实（D：\程序）
按我的理解 InitDir设置的是默认目录,那么应该是在运行时获取的值.......你应该是在调出对话框前赋值!!!!结果你查看的是上一次的值吧
这是我的理解 在载入窗体时赋值CommonDialog1.InitDir = App.Path & "\dxdmzbqzhjsjg.txt" 呵呵 应该就没问题啦