系统temp目录的问题

[c104]

程序如下，使用API取得temp目录：

Declare Public Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (Byval nBufferLength As Long, Byval lpBuffer As String) As Long

'取得Temp的Directory
Dim sTempFolder As String'temp目录路径
Dim len5 As String
sTempFolder = String(255, 0)
len5 = GetTempPath(256, sTempFolder)
sTempFolder = Left(sTempFolder, len5)

这样取得的sTempFolder在目录路径中不含中文的情况下是没问题的，但是一旦含有中文，就会出错，left会把中文字符作为双字节处理的，有什么办法来解决这个问题吗？

[bmd2chen]

sTempFolder=LeftB(sTempFolder,len5)

[江海门户]

可以

[truewill]

leftb不行的，会把英文当两字节的……

还是找第一个vbNullChar吧

[bmd2chen]

乱说，你试过再说会不会把英文当两字节处理
当然也可以用你的方法
来定位