Страница: 1 |
Страница: 1 |
Вопрос: Сохранить/загрузить данные в ListBox?
Добавлено: 20.04.06 17:02
Автор вопроса: warman
Dim a As String
Dim File As IO.TextWriter
File = IO.File.CreateText("C:\1.txt")
File.WriteLine(ListBox1.Items(a))
File.Close()
Пытался так сохранить, но так только первую строчку сохраняет.
Ответы
Всего ответов: 5
Номер ответа: 1
Автор ответа:
EROS
Вопросов: 58
Ответов: 4255
Профиль | | #1
Добавлено: 20.04.06 19:20
Public Class Form1
Dim fPath As String = "C:\ListBoxItems.txt"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ListBox1.Items.Clear()
Dim sr As StreamReader = New StreamReader(fPath)
Do While sr.Peek >= 0
Me.ListBox1.Items.Add(sr.ReadLine())
Loop
sr.Close()
End Sub
Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
Dim sw As StreamWriter = File.CreateText(fPath)
For Each Item As String In Me.ListBox1.Items
sw.WriteLine(Item)
Next
sw.Close()
End Sub
End Class
Номер ответа: 2
Автор ответа:
EROS
Вопросов: 58
Ответов: 4255
Профиль | | #2
Добавлено: 20.04.06 19:22
Обработка ошибок System.IO.IOException за тобой...
Номер ответа: 3
Автор ответа:
warman
Вопросов: 1
Ответов: 2
Профиль | | #3
Добавлено: 21.04.06 14:13
А что это такое? Я первый раз програмку делаю.
Номер ответа: 4
Автор ответа:
EROS
Вопросов: 58
Ответов: 4255
Профиль | | #4
Добавлено: 21.04.06 15:18
IOException- это вид ошибок, связаный в данном случае с операциями ввода-вывода.. Другими словами пытаешься ты считать файл, которого нет, или пытаешься открыть файл для записи занятый другим процессом.. Именно этот тип ошибки ты и получишь. Так что тебе придется позаботится о перехвате всевозможных ошибок. Делается это с помощью блока Try-Catch-End Try.. Все подробности по использованию найдешь в соответствующей литературе..
Номер ответа: 5
Автор ответа:
warman
Вопросов: 1
Ответов: 2
Профиль | | #5
Добавлено: 21.04.06 16:40
ок, спасибо!