得到无误的程序目录
appPath = Trim(App.Path)
If Right(appPath, 1) <> "/" Then appPath = appPath & "/"
考虑到了程序位于磁盘根目录的情况
——————————————————————
中文无乱码的LeftB函数
StrConv(LeftB(StrConv("你好", vbFromUnicode), 3), vbUnicode)
返回"你"而非"你}"
得到无误的程序目录
appPath = Trim(App.Path)
If Right(appPath, 1) <> "/" Then appPath = appPath & "/"
考虑到了程序位于磁盘根目录的情况
——————————————————————
中文无乱码的LeftB函数
StrConv(LeftB(StrConv("你好", vbFromUnicode), 3), vbUnicode)
返回"你"而非"你}"