File List Box

[Человек]

Как убрать расширение файлов?
У меня есть FileLB, который отображает содержимое папки с txt файлами.
Мне необходимо, что бы писалось не "заметка.txt" , а просто "заметка"
Зарание всем спасибо....

[Amed]

ИМХО с FileListBox никак. Надо создать рядом обычный ListBox и скопировать туда все полученные, уже отформатированные пути (имена файлов), а FileListBox в идеале вообще скрыть

[Человек]

А можно по подробнее?
Просто у меня содержимое FileLB будет постоянно изменяться.

[Amed]

Создаёте на форме FileListBox с именем filFiles, затем ListBox с именем lstFiles.

Делаем процедуру перемещения элементов списка:

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

Private Sub Update()
Dim i as Integer

lstFiles.Clear
For i = 0 To filFiles.ListCount - 1
lstFiles.AddItem Left$(filFiles.List(i), Len(filFiles.List(i))-4)
Next i
End Sub

И вызываем процедуру, как только изменяется FileListBox. Понятно?