0

これは、データベースからコンボ ボックスにレコードを表示するための私のコードですが、コードを編集してテキスト ボックス用に作成すると、テキスト ボックスで.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()

テキストボックスを使用してデータベースからデータを表示するための対応するコードは何ですか?

4

3 に答える 3

2

これを簡単に行うことができます：

yourTextBox.Text = dt.Rows(0)("ColumnName").ToString()
于 2013-04-08T08:24:57.603 に答える
0

datasource、valuemember のようなプロパティはなく、表示名は利用できません。このリンクを参照してください。

http://msdn.microsoft.com/en-us/library/system.web.ui.webcontrols.textbox_properties(v=vs.90).aspx

データベースまたはローカル割り当てからのみ値を割り当てることができます。次の方法で行う必要があります。txtUserName textboxがある場合、次の方法を割り当てる必要があると仮定します

txtLocationCode=dt.rows[0]["列名"].tostring()

コレクション オブジェクトではないため、使用できないプロパティ データソースはありません。データベースからの列値を 1 つだけ保持します。

アップデート ：

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

お役に立てれば

于 2013-04-08T08:20:51.910 に答える
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
于 2013-04-08T08:38:05.340 に答える