คือผมต้องการดึงข้อมูลจาก ฐานข้อมุลมาเเสดงใน Texbox ผมต้องทำไงครับใช้ Appserv ทำฐานข้อมูลครับ

        Dim objConn As New MySqlConnection
        Dim objCmd As New MySqlCommand
        Dim dtAdapter As MySqlDataAdapter
        Dim NewTexbox As New DataTable
        Dim strConnString, strSQL As String

        strConnString = "Server=localhost;User Id=root; Password=root; Database=Account; Pooling=false"
        objConn.ConnectionString = strConnString
        objConn.Open()

        strSQL = "SELECT * FROM account_num WHERE outstanding = '" & TextID.Text & "' "

        dtAdapter = New MySqlDataAdapter(strSQL, objConn)
        dtAdapter.Fill(NewTexbox)

        If NewTexbox.Rows.Count > 0 Then
            Me.TextID.Text = TextID.Text
            Me.TextID.Text = NewTexbox.Rows(0)("TextID")
        End If

        objConn.Close()
        objConn = Nothing