填充基于combobox vb.net的标签

时间:2015-03-04 14:30:17

标签: sql vb.net

我有以下代码填充我的组合框,但是我想用下面的select语句中的第二个数据库列填充标签。

我很难理解如何完成这项工作?这是正确的直接完成任务吗?

        da.SelectCommand = New SqlCommand("SELECT [ShopDesc], [ShopCode] FROM fg_tbl_Shop_List", conn)
    da.Fill(dt)

    Dim r As DataRow
    For Each r In dt.Rows
        com_Shop_List.Items.Add(r("ShopDesc").ToString)
        lbl_ShopCode.Text = com_Shop_List.Items.Add(r("ShopCode").toint)
    Next

2 个答案:

答案 0 :(得分:0)

  

我想用第二个

填充标签

您可以使用标签控件显示任何文本。您无法通过某些数据填充它,下次您无法从组合框或列表框等标签中选择其中一个数据。只是为了显示任何字符串类型数据。



Label1.Text = "Your String Value"




答案 1 :(得分:0)

从组合框中选择时,您可以尝试以下代码。



Private Sub com_Shop_List_SelectedIndexChanged(sender As System.Object, e As System.EventArgs) Handles com_Shop_List.SelectedIndexChanged
    
  Dim r As DataRow
  For Each r In dt.Rows
    If r.Item("[ShopDesc]") = com_Shop_List.Items(com_Shop_List.SelectedIndex) Then
      lbl_ShopCode.Text = r.Item("[ShopCode]")
      Exit For
    End If
  Next

End Sub



 希望它可以帮到你。