Вытащить текст из Докумнета. Visual Basic

[Moisei]

Короче имеется следующий код:


Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim data As String
Dim sReader As IO.StreamReader
sReader = IO.File.OpenText("Simple.txt")
data = sReader.ReadLine()
Label3.Text = data

Do While data <> ""
data = sReader.ReadLine()
Loop
sReader.Close()
End Sub


Как сделать так чтобы выводило в лейбл каждую строку?
В MessageBox вывод каждую а вот если в лейбл то нет =(
Сразу заверщается процес...

Кто-нибудь сможет тут помочь?

[J-Fobos]

Я не знаю как в ВБ лейбл устроен, но думаю что сработает также как и в делфи:
Label3.Text:=Label3.Text+#13#10+data;
#13#10 - это символы перехода на новую строку и начала новой строки в ANSI кодировке.

[Moisei]

Я не знаю как в ВБ лейбл устроен, но думаю что сработает также как и в делфи:
Label3.Text:=Label3.Text+#13#10+data;
#13#10 - это символы перехода на новую строку и начала новой строки в ANSI кодировке.
Спасибо =)
Но ты не подскажешь где делфи скачать? =)
А то VB Уже убивает =((

[Рэйзор]

Спасибо =)
Но ты не подскажешь где делфи скачать? =)
А то VB Уже убивает =((

если тебя устроит 30 дн. триал 2011 то
[Ссылки могут видеть только зарегистрированные и активированные пользователи]
если нет то 2010 студия:
[Ссылки могут видеть только зарегистрированные и активированные пользователи]