组合框是空白的

Question

在我看来，组合框只显示字符串值。我有一个整数的表格列，我需要在组合框中显示以供用户选择。

    Dim cmd As New SqlCommand("Select ID From ATable", con)
    Dim ds As New DataSet()
    Dim adap As New SqlDataAdapter(cmd)

    If con.State = ConnectionState.Closed Then con.Open()
    adap.Fill(ds, "ATable")
    con.Close()

    comboBox1.DisplayMember = "ID"
    comboBox1.DataSource = ds.Tables("ATable")
    comboBox1.SelectedIndex = -1

组合框只是空白，我在想它是因为我的字段是整数而不是字符串。如何让它显示我的整数值。编辑：我需要将函数放在我的公共子表单initializecomponent（）

中

Answer 1

在initializecomponent（）

之后将函数放在public子表单中