20/06/2021, 19:33
merhaba arkadaşlar aşağıda verilen kodun 30 a yakın label ve textboxlarda kullanacağım için kodların alt alta yazılmasını nasıl yaparım.
Dim komut As New OleDbCommand("insert into bilgiler(ad,soyad,adres,telefon,email)values('" + TextBox1.Text + "','" + TextBox2.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "','" + TextBox5.Text + "')", baglanti)
örnek olarak bulduğum kod ( bunun gibi yapmak istiyorum. )
Do While Dreader.Read
txtAd.Text = Dreader("Ad").ToString
txtSoyad.Text = Dreader("Soyad").ToString
txtSehir.Text = Dreader("Sehir").ToString
Dim komut As New OleDbCommand("insert into bilgiler(ad,soyad,adres,telefon,email)values('" + TextBox1.Text + "','" + TextBox2.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "','" + TextBox5.Text + "')", baglanti)
örnek olarak bulduğum kod ( bunun gibi yapmak istiyorum. )
Do While Dreader.Read
txtAd.Text = Dreader("Ad").ToString
txtSoyad.Text = Dreader("Soyad").ToString
txtSehir.Text = Dreader("Sehir").ToString