VB datacombo 如何綁定數據

[吃瓜日常]

VB開發過程中發現，datacombo在綁定數據的過程中只綁定了第一行的數據，并未對數據完全綁定，代碼如下

Public Function PCBALineDATA() As ADODB.Recordset
Dim Line As String
Dim sqlLine As String
Dim rsTCBALine As ADODB.Recordset
    sqlLine = ""
    sqlLine = "SELECT LINEID FROM MLINEM"
    Set rsTCBALine = OffMUSE(sqlLine, DED.cnWIP)
    If rsTCBALine.RecordCount <> 0 Then
    Line = rsTCBALine.Fields("LINEID")
    DataCombo1.BoundText = Line
    Else
    MsgBox "PCBA所在拉別綁定失敗，請檢查數據庫連接", vbExclamation, Me.Caption
    End If
End Function

希望大家能幫幫忙，謝謝

[智者知已应修善业]

这个好似网站,使用.DataSource试看

[吃瓜日常]

引用 2 楼 智者知已应修善业 的回复:

给你看个C#的例子,VB语句写法基本类似

哈哈,刚打开发现已经有了,好似之前回复用的,正好

好的，謝謝啦，這個問題其實已經解決了，公司有自用的方法，但還是謝謝你的解答

[智者知已应修善业]

给你看个C#的例子,VB语句写法基本类似 哈哈,刚打开发现已经有了,好似之前回复用的,正好