Option Explicit
Private Sub Form_Load()
Dim FF As Integer
Dim Tmp As String
FF = FreeFile
Open "c:\Файл.txt" For Input As #FF
Do While Not EOF(FF)
Line Input #FF, Tmp
Call List1.AddItem(Tmp)
Loop
Close #FF
End Sub
вопрос listBox
Привет всем..
Короче у меня такой вопрос listBox можно зделать какой-нибудь файл чтоб через него были свола в списки?
Короче у меня такой вопрос listBox можно зделать какой-нибудь файл чтоб через него были свола в списки?
Если как я понял тебе нужно именно этот код:
И на последок пиши понятнее и без ошибок. А то ты свой ответ будешь ждать долго или вопще… Короче уважай участников форума
Код:
И на последок пиши понятнее и без ошибок. А то ты свой ответ будешь ждать долго или вопще… Короче уважай участников форума
Да то что нужно...
Спасибо :)
Спасибо :)
Да, только вместо "txt" можно использовать и другое расширение, чтоб другие не лазали в твой файл!
Цитата: SPB-667
Да, только вместо "txt" можно использовать и другое расширение, чтоб другие не лазали в твой файл!
Да, только этот же фаил можно открыть будет любим текстовым редактором ... :(
Цитата: Zero45(:)
Да, только этот же фаил можно открыть будет любим текстовым редактором ... :(
ну, если тебе нужно в нём что-то редактировать вручную, то лучше, конечно TXT-файл, но, тогда теряется смысл его взаимосвязи с программой!