Question

vb.tab中是否有任何示例出现在列表框中？因为我只能显示一个数据。我想显示雇主身份证号码和姓名。

示例：

50 Alex

以下是我的编码只显示雇主名称：

Dim qryUserlst As String = "SELECT emp_name FROM employer Where emp_name like '" & txtEmpName.Text & "%' ORDER BY emp_name ASC "
    daUserlst.SelectCommand = New OdbcCommand(qryUserlst, conn)

    Dim cb As OdbcCommandBuilder = New OdbcCommandBuilder(daUserlst)

    daUserlst.Fill(dsUserlst, "employer") 'fill dataset with data
    Dim dtUserlst As DataTable = dsUserlst.Tables("employer")

    Try
        If dsUserlst.Tables(0).Rows.Count > 0 Then
            lstEmpName.DataSource = dtUserlst
            lstEmpName.DisplayMember = "emp_name"
            lstEmpName.Visible = True
        Else
            lstStkCat.Visible = False
        End If

    Catch ex As OdbcException
        MsgBox(ex.ToString)
    Finally
        conn.Close()
    End Try

Answer 1

如果您希望坚持使用相同的模式/代码设置，只需更改SQL语句以连接两列以创建新列以供显示。 SQL语法可能会有所不同，具体取决于您的RDBMS。以下是SQL Server特定的。

SELECT empname + ' ' + LTRIM(STR(empid)) as EmpDisplay FROM employer......

然后使用新列绑定到您的列表：

lstEmpName.DisplayMember = "EmpDisplay"

vs.net中的vb选项卡

1 个答案: