Databound Combobox给我空场?

时间:2013-09-06 20:59:30

标签: vb.net combobox

我有一个vb.net ComboBox,它被数据绑定到Oracle数据库中的一个表。 oracle数据库填充我的解决方案中定义的数据集。我的一个视图中有一些组合框可以分配给单独的数据集。它们都正常工作,除了一个。其中一个按预期返回80行数据,但组合框中没有文本。所以你只是搜索80行没什么。这是代码:

    Dim dsLegalEntity As New DataSet
    Dim dsTaxCertification As New DataSet
    Dim dsStates As New DataSet
    Dim mdataviewLegalEntity As New DataView
    Dim mdataviewTaxCertification As New DataView
    Dim mdataviewStates As New DataView

    Try

        dsLegalEntity = My.WebServices.Service.GetLegalEntities()
        mdataviewLegalEntity = New DataView(dsLegalEntity.Tables("AS_LEGAL_ENTITIES"))

        dsTaxCertification = My.WebServices.Service.GetTaxCertCodes
        mdataviewTaxCertification = New DataView(dsTaxCertification.Tables("TAX_CERT_CODE"))

        dsStates = My.WebServices.Service.GetVendorStates
        mdataviewStates = New DataView(dsStates.Tables("VENDOR_STATES"))

        With comboLegalEntity
            .DataSource = mdataviewLegalEntity
            .ValueMember = "LEGAL_ENTITY"
            .DisplayMember = "LEGAL_ENTITY"
        End With

        With comboTaxCertification
            .DataSource = mdataviewTaxCertification
            .ValueMember = "TAX_CERT_CODE"
            .DisplayMember = "TAX_CERT_CODE_DESCR"
        End With

        With comboState
            .DataSource = mdataviewStates
            .ValueMember = "STATE"
            .DisplayMember = "STATE"
        End With

        comboPurchSale.SelectedIndex = 0
    Catch ex As Exception
        AppError.InsertAppError(ex.ToString(), "btnQSearch_Click", "Default.aspx", "")
    End Try

问题的组合框是“comboState”。数据集表名称称为“VENDOR_STATES”,它指向的列称为“STATE”。据我所知,我的名字是正确的,所以我不明白为什么这个名字不能正常工作而其他人工作正常。在此先感谢您的帮助。

1 个答案:

答案 0 :(得分:1)

问题得到了解决。事实证明,从存储过程返回的数据集列和列名必须匹配才能使数据正确通过。将SELECT AS STATE添加到我的存储过程select语句后,它完美地工作。