テキストファイルについて

タグの編集
投稿者 みじんこ  (中学生) 投稿日時 2009/8/23 05:42:31
テキストファイルを読み込んで、
テキストファイルの1行目をTextbox1.textに。
テキストファイルの2行目をTextbox2.textに表示させるにはどうしたらよいのでしょうか?
投稿者 まだまだ  (中学生) 投稿日時 2009/8/23 06:02:34
Dim reader As New IO.StreamReader(Path)
Textbox1.Text=reader.Readline
Textbox2.Text=reader.Readline

こんな感じでしょうか?
投稿者 ゆきと  (中学生) 投稿日時 2009/8/23 06:06:56
こうですか?わかりません><
Imports System.IO
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgs) Handles Button1.Click
        Dim stream As New StreamReader("C:\test.txt", _
                    System.Text.Encoding.GetEncoding("Shift-JIS")) ' ストリーム作成 
        For i = 0 To 0
            TextBox1.Text = stream.ReadLine() '一行目を読み込み表示 
            If i < 1 Then
                TextBox2.Text = stream.ReadLine() '二行目を読み込み表示 
            End If
        Next
        stream.Close() '閉じる 
    End Sub
End Class
投稿者 みじんこ  (中学生) 投稿日時 2009/8/23 06:42:21
お二人ともありがとうございます。
とても同じ中学生とは思えません。
無事やってみたい事が実現しました。
ありがとうございました( ´・ω・)ノ