r = RegCreateKey(HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\ssql", keyhand)
    r = RegSetValueEx(keyhand, "ssql", 0, REG_SZ, ByVal str, Len(str))
    r = RegCloseKey(keyhand)
我的字符串是:
str="lakh  "
用以上方法写入注册表,字符串的len宽度是6写入后再读出来宽度len只有4:也就是只有"lakh"
r = RegOpenKey(HKEY_LOCAL_MACHINE, "Software\Microsoft\Windows\ssql", keyhand)
r = RegQueryValueEx(keyhand, "ssql", 0&, 0&, ByVal 0&, lDataBufSize)
strBuf = String(lDataBufSize, "0")
lResult = RegQueryValueEx(keyhand, "ssql", 0&, 0&, ByVal strBuf, lDataBufSize)
If lResult = ERROR_SUCCESS Then
   intZeroPos = InStr(strBuf, Chr$(0))
   If intZeroPos > 0 Then
      GetString = Left(strBuf, intZeroPos - 1)
   Else
      GetString = strBuf
   End If
End If
高手们帮忙看一下啊..