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 |
沒有留言:
張貼留言