Skip to main content

AccessTr.neT


Combobox seçerek textboxlara veri aktarımı

Combobox seçerek textboxlara veri aktarımı

Çözüldü #1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim rs2 As Object
Call baglan()
rs2 = CreateObject("adodb.recordset")
rs2.open("select firma_id from sgk where sgkkod<>'' order by firma_id", baglanti, 1, 1)

If rs2.recordcount > 0 Then
Do While Not rs2.eof
ComboBox1.Items.Add(rs2(0).value)
rs2.movenext()
Loop
End If
rs2.close()
baglanti.close()
End Sub
Bu kod ile combobox1 e veriyi aktarıyorum fakat sadece id geliyor. Benim istediğim şudur

Combobox1 e firmalar isimleri ile gelsin, Seçtiğim firma ismine bağlı olarak "sgk" tablosundaki verilerde Textbox1, Textbox2 ye yazılsın

Teşekkürler.
sorum.rar
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Combobox seçerek textboxlara veri aktarımı - Yazar: drummers - 03/05/2012, 13:14