VB高手救命!

来源：百度知道 编辑：UC知道 时间：2024/05/30 19:15:26
我正在编个程序,里面有个打开命令,我记得是a=shell(位置 ,1)吧,程序差不多完成了,但是在生成EXE后,假如我的游戏改位置了.自然就打不开了,怎样才能可以在EXE里直接改变程序位置啊?求助!!!!!!!!!!!!
1楼的!谢谢,但是这段代码加在哪啊?告诉我详细的过程吧!我就给你分!

用 App.Path 获得生成的 EXE 文件的路径
Dim nPath As String, MyRun As String
nPath = App.Path
If Right(nPath, 1) <> "\" Then nPath = nPath & "\"
MyRun = "你要打开的东西.exe"
a = Shell(nPath & MyRun, 1)

补充：
App.Path ：在开发环境中表示 .VBP 工程文件的路径，在生成exe应用程序运行时表示 .exe 文件的所在路径。
用 VB 打开你的工程文件，找到你的 a=shell(位置 ,1) 语句，用以上代码替换它。重新生成EXE。

另外，你的说法似乎有些不妥。尽我知道的知识，与朋友讨论和共享，是我的快乐，在百度取得分不是唯一目的。套用一句话：给分不是万能的，没有分是万万不能的。

如果仍有问题，我愿意继续与你互相讨论。