我用GetModuleFileName得到了我工程的全路径C:\Documents and Settings\童绪\桌面\weather\Debug\weather.exe

我用GetModuleFileName得到了我工程的全路径C:\Documents and Settings\Owen\桌面\weather\Debug\weather.exe
但是我只需要到C:\Documents and Settings\Owen\桌面\weather 怎么把后面的截取了啊

Dim StrPath As String
StrPath = "C:\Documents and Settings\Owen\桌面\weather\Debug\weather.exe"
StrPath = Left$(StrPath, InStrRev(StrPath, "\", InStrRev(StrPath, "\") - 1))

int n;

n = lstrlen(lpFileName)-1;

while(_T('\\') != lpFileName[n])

{

n--;

}

lpFileName[n] =0;

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息