Pages

Thursday, July 17, 2014

Menampilkan Isi Field Tabel Ke Combo Box (Vb.Net 2008)



    Sub kombo_pell()
        Cmd = New OdbcCommand("SELECT kd_pell FROM pelanggan", Conn)
        Rd = Cmd.ExecuteReader
        Do While Rd.Read
            cmb_kd_pell.Items.Add(Rd.Item(0))
        Loop
    End Sub

No comments:

Post a Comment