2020年5月8日 星期五

VB.NET Access顯示在ComboBox [Show Access Data in ComboBox]


 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
    Public Sub ShowDataInCboLogin(ByVal ds As DataTable, ByVal cbo As ComboBox)

        cbo.Items.Clear()

    '動態

        cbo.DataSource = ds

        cbo.DisplayMember = "User" '排名

    '固態

        For Each row As DataRow In data.Rows

            cbo.Items.Add(row.Item("User"))

        Next

    End Sub

沒有留言:

張貼留言