Dim dr As Datarow OledbDataAdapter1.Fill(Dataset11) For Each dr In Tablo1.Tablo Combobox1.Items.Add(dr.Item("Kullanıcı")) Next yusuf çakmak http://www.visualbasicturk.net