Удалить лишние символы

[Kovu]

Есть такой код

Код: Выделить всё


Dim StrFileExe As String * 255
FindExecutable strTemp, "C:\temp", StrFileExe


В результате него в строковой переменной StrFileExe оказывается имя нужного файла, которое естественно меньше 255 символов(в большинстве случаев) Как убрать эти лишние символы?
P.s. Чему равна константы ASSOCSTR_FRIENDLYAPPNAME и ASSOCSTR_EXECUTABLE

[alibek]

StrFileExe это null-terminated строка, т.е. обрезаешь до первого символа Null. Кроме того, API-функции часто возвращают длину текста, если для FindExecutable это справедливо, то обрезаешь по возвращаемой длине.

[Kovu]

StrFileExe это null-terminated строка, т.е. обрезаешь до первого символа Null. Кроме того, API-функции часто возвращают длину текста, если для FindExecutable это справедливо, то обрезаешь по возвращаемой длине.

А можно мне тупому объяснить как этот самый первый Null символ найти
P.S. Длину ф-я не возвращанет

[alibek]

Left$(strFileExe, InStr(strFileExe & vbNullChar, vbNullChar))

[Kovu]

Пасиба

[vvs_adm]

Left$(strFileExe, InStr(strFileExe & vbNullChar, vbNullChar))

А разве не

Код: Выделить всё

Left$(strFileExe, InStr(strFileExe & vbNullChar, vbNullChar)-1)


[alibek]

Ну да, -1 забыл.