อยากทราบคำสั่งที่ใช้ Read data from file text โดยที่ข้อมูลจะแสดงอยู่ใน textbox

[cheapache]

สวัสดีครับอาจารย์ ขอรบกวนหน่อยครับ
ผมอยากทราบว่า ทำยังไงถึงจะให้ข้อมูลทั้งหมดใน text ที่ผมเขียนมา แสดงอยู่ใน textbox1 แบบเรียงลำดับตามเวลาครับ (แสดงข้อมูลครั้งละ 1 ตัว)

[snasui]

โพสต์ Code ที่ลองเขียนเองมาแล้วด้วย แจ้งด้วยว่าติดบรรทัดไหน อย่างไร จะได้ช่วยดูต่อไปจากนั้นครับ

[cheapache]

ที่บรรทัด a = reader.ReadLine() ต้องแก้ไขยังไงครับให้ TextBox1 มันโชว์ข้อมูลถัดไปที่อยู่ใน Text โดยให้สัญญาณ Clock เป็น Timer
ขอบคุณครับ

Code: Select all

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim reader As New System.IO.StreamReader("D:\texttest.txt")
        Dim a As String
        'TextBox1.Multiline = True
        'TextBox1.ScrollBars = ScrollBars.Both
        'Me.Controls.Add(TextBox1)
        'TextBox1.WordWrap = True

        a = reader.ReadLine()
        reader.Close()
        TextBox1.Text = a


    End Sub
    Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
        TextBox1.Clear()
        'TextBox2.Clear()
        'TextBox3.Clear()
    End Sub

    Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
        Label1.Text = TimeOfDay.ToString("h:mm:ss tt")
    End Sub
End Class

[snasui]

เข้าใจว่าต้องอ่านเป็น Line ไป ลองศึกษาเพิ่มเติมจาก Link นี้ครับ http://www.visual-basic-tutorials.com/r ... -basic.htm