使用sql数据库中的文本框显示记录

时间:2013-04-08 07:59:26

标签: sql vb.net winforms combobox textbox

这是我的代码,用于显示从数据库到组合框的记录,但是当我编辑代码并将其设置为文本框时,.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()

使用文本框从数据库显示数据的相应代码是什么?

3 个答案:

答案 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