0
Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
    Dim cons, query As String
    Dim con As OdbcConnection
    Dim adpt As OdbcDataAdapter
    'Dim num As Integer
    cons = "dsn=Courier; UID=Courier; PWD=123;"
    con = New OdbcConnection(cons)

    con.Open()

    query = "select Name from EMPLOYEE where EMPLOYEE_ID=" + DropDownList1.SelectedValue
    Dim ds As DataSet
    adpt = New OdbcDataAdapter(query, con)
    ds = New DataSet
    adpt.Fill(ds, "Courier")

    ' TextBox1.Text = ds

    con.Close()
End Sub

我想在查询中指定 whoos ID 的文本框中显示员工的姓名,我该怎么办?

4

2 回答 2

2

你应该使用 DataRow 但要回答你的问题,试试这个。

TextBox1.Text = ds.Tables(0).Rows(0)("Name").ToString()
于 2012-09-20T19:28:42.033 回答
0

由于您只想要一个值,因此您应该完全跳过数据集和适配器。

query = "select Name from EMPLOYEE where EMPLOYEE_ID=" + DropDownList1.SelectedValue
Dim TempName As String = query.ExecuteScalar
TextBox1.Text = TempName

ExecuteScalar 返回第一行的第一个单元格,这就是您所需要的。

您还应该阅读有关参数的信息。

于 2012-09-21T00:04:05.297 回答