这是我的代码,用于显示从数据库到组合框的记录,但是当我编辑代码并将其设置为文本框时,.DataSource
和.ValueMember
不适用于文本框。
Dim sqlconn As New SqlClient.SqlConnection
sqlconn.ConnectionString = "server = SKPI-APPS1;" & _
"Database = EOEMS;integrated security=true"
Dim dt As New DataTable
sqlconn.Open()
Dim da As New SqlDataAdapter("SELECT * FROM tblOfficeEquipmentProfile", sqlconn)
da.Fill(dt)
cmbLocationCode.DataSource = dt
cmbLocationCode.ValueMember = "OE_ID"
sqlconn.Close()
使用文本框从数据库显示数据的相应代码是什么?
答案 0 :(得分:2)
你可以这么做:
yourTextBox.Text = dt.Rows(0)("ColumnName").ToString()
答案 1 :(得分:0)
没有像数据源,值成员和显示名称这样的属性将无法使用。请参考此链接。
http://msdn.microsoft.com/en-us/library/system.web.ui.webcontrols.textbox_properties(v=vs.90).aspx
您只能从数据库或本地分配中分配值。你应该通过以下方式做。假设您有 txtUserName 文本框,则应指定以下方式
txtLocationCode = dt.rows [0] [“列名”] .tostring()
没有属性数据源不可用,因为它不是集合对象。它只包含数据库中的一个列值。
更新:
Public Sub PopulateOeqProfileForm()
Dim sqlconn As New SqlClient.SqlConnection
sqlconn.ConnectionString = "server = SKPI-APPS1;" & _
"Database = EOEMS;integrated security=true"
Dim dt As New DataTable
sqlconn.Open()
Dim SelectCommand As New SqlClient.SqlCommand (SELECT OE_ID FROM tblOfficeEquipmentProfile, sqlconn)
txtOEID.Text = Cstr(SelectCommand.ExecuteScalar())
sqlconn.Close()
End Sub
希望这有帮助
答案 2 :(得分:0)
它不显示数据先生
Public Sub PopulateOeqProfileForm()
Dim sqlconn As New SqlClient.SqlConnection
sqlconn.ConnectionString = "server = SKPI-APPS1;" & _
"Database = EOEMS;integrated security=true"
Dim dt As New DataTable
sqlconn.Open()
Dim da As New SqlDataAdapter("SELECT * FROM tblOfficeEquipmentProfile", sqlconn)
da.Fill(dt)
txtOEID.Text = dt.Rows(0)("OE_ID").ToString()
sqlconn.Close()
End Sub