Silver Ghost
Зарегистрирован: 22.03.2005
Сообщения: 10
Откуда: Россия, Тольятти
|
 Добавлено: Вт Окт 18 2005 19:43 Заголовок сообщения: Сохранение списка в текстовый файл (visual basic 6.0) |
 |
|
Вот код одной незатейливой проги:
| Код: |
Dim strsv, save_file As String
Dim i, n As Integer
Dim streamWr As IO.StreamWriter
save_file = InputBox("Введите имя файла", "Сохранить данные в файл...")
streamWr = IO.File.CreateText(save_file)
n = lbList.Items.Count
For i = 0 To n
strsv = lbList.Items.Item(i)
streamWr.WriteLine(strsv)
Next i
streamWr.Close() |
Вроде бы все проще не куда, да вот никак не могу сохранить этот список [strsv(тип string) = lbList.Items.Item(i) (тип integer)]: на лицо несовпадение типов, но ничего лучше в голову не приходит. |
|
FAQ 
Поиск 
Пользователи 
Группы
Регистрация
Профиль 
Войти и проверить личные сообщения 
Вход 
)