Загрузка данных из SQL Server построчно в текстовые поля - PullRequest
0 голосов
/ 23 марта 2011

Я пытаюсь извлекать данные построчно из моего SQL Server и загружать их в соответствующие текстовые поля. Я делал приведенный ниже код, но, конечно, он не работает, поскольку цикл For Each будет загружать все отдельные текстовые поля с каждымизвлеченные данные исчерпали идеи.Ценю, если кто-то может дать мне поддержку здесь.Спасибо.

Private Sub retrieve_Data()
        Dim con As New SqlConnection
        Dim cmd As New SqlCommand

        Try
            con.ConnectionString = "Data Source=HPEnvy-HP; Initial Catalog=Cinema; User Id=<id>; Password=<password>;"
            con.Open()
            cmd.Connection = con

            cmd.CommandText = "SELECT [movie_ID], [movie_Title] FROM [Movie_Table] ORDER BY [MOVIE_ID] "

            Dim lrd As SqlDataReader = cmd.ExecuteReader()

            While lrd.Read()

                Dim reader As String = lrd(1).ToString
                Dim arrLoad As New ArrayList


                arrLoad.Add(lrd(1).ToString)
                For i = 0 To arrLoad.Count - 1
                    For Each cCtrl As Control In Panel1.Controls
                        If TypeOf cCtrl Is TextBox Then
                            Dim txtBox As New TextBox
                            txtBox = cCtrl
                            txtBox.Text = arrLoad.Item(i)
                        End If
                    Next
                Next
    End While

        Catch ex As Exception
            MessageBox.Show("Error while retrieving records on table..." & ex.Message, "Load Records")
        Finally
            con.Close()
        End Try
    End Sub

1 Ответ

0 голосов
/ 23 марта 2011

вы просто «новый» текстовое поле, вы не добавили текстовое поле в форму.Вы должны добавить такой код: this.Controls.Add (textbox);или this.Panel1.Controls.Add (textbox);

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...