Как получить данные из таблицы базы данных в текстовые поля
Как отобразить конкретные данные строк в таблице базы данных в текстовых полях.
Dave Kreskowiak
Переписали, сняли кричать заглавными буквами.
Переписали, сняли кричать заглавными буквами.
попробовать это
Сначала создайте соединение, чтобы подключиться к вашей базе данных в соответствии со мной, добавьте класс в свой проект с именем it myCon
Поставьте следующий код
Public Shared Function con() As SqlClient.SqlConnection Dim Connects As New SqlClient.SqlConnection("Data Source=CBSITS6\SQLEXPRESS;Initial Catalog=New;Integrated Security=True;Pooling=False") Connects.Open() Return Connects End Function
Public Sub Display() Dim sd As New SqlClient.SqlDataAdapter("Select * from TableName", myCon.con()) Dim dt As New DataTable sd.Fill(dt) If dt.Rows.Count > 0 Then txtAddress.Text = dt.Rows(0).Item("Address").ToString() End If End Sub
Государственные Суб-Дисплей()
Dim sd как новый SqlClient.SqlDataAdapter ("Select * from TableName", myCon. con())
Дим ДТ в качестве нового объекта DataTable
СД.Заполнить(ДТ)
Если DT.Rows.Тогда считайте > 0
txtAddress.Текст = ДТ.Строк(0).Пункт("Адрес").Метод toString()
Конец, Если
Конец Подводной Лодки