[Помогите!] Вытащить текст из Докумнета. 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]

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

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

[Рэйзор]

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

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