VisualBasic.Net / Verileri Combobox'a Aktarmak

Dim connk As SqlConnection = New SqlConnection(server=(local);database=deneme;trusted_connection=true)[/COLOR][/SIZE][/FONT][/CENTER][/COLOR][/SIZE][/FONT][/CENTER]
[FONT=Trebuchet MS][SIZE=6][COLOR=#8000ff]
[CENTER][FONT=Trebuchet MS][SIZE=6][COLOR=#8000ff]
[CENTER]        Dim listek As String
        listek = "select cat from cats"
        Dim esk As SqlCommand = New SqlCommand(listek, connk)
        connk.Open()
        Dim readerk As SqlDataReader = esk.ExecuteReader
        Do While readerk.Read
            kategori.Items.Add(readerk("cat"))
        Loop
 
Not: Buradaki ayarları kendi ayarlarınıza göre değiştirin.