ok langsung saja ke cara-caranya :
Untuk Coddingnya Seperti ini
Sub getdev()
ConectDB()
CMD = New SqlCommand("select distinct Devisi from M_Dev ", CONN)
DR = CMD.ExecuteReader
Do While DR.Read
CmbDevisi.Items.Add(DR.Item("Devisi").ToString)
Loop
End Sub
Penjelasannya:
Sub getdev() atau bisa juga Private Sub getdev(), inu saya buat kan Sub untuk menyimpannya di Form Load Untuk mempermudah Codingnya dan juga lebih rapih
nah codding ini maksudnya untuk memanggil kolom Devisi di Tabel M_Dev dan ditampilkan ke Combobox.
Terimakasih atas kunjungnya,
Semoga Bermanfaat sobat
0 komentar