21/01/2016, 15:11
Metlesshade
(21/01/2016, 15:06)POWER yazdı: Button1 in click olayına aşağıdaki kodu yapıştırın...
Domates ve Soğan adetlerini getirmektedir... Devamını getirirsiniz...
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
baglanti.Open()
Dim komut As New OleDb.OleDbCommand("SELECT * FROM pizza", baglanti)
Dim oku As OleDb.OleDbDataReader
oku = komut.ExecuteReader()
While oku.Read()
If oku(1) = ComboBox1.Text Then
Label10.Text = oku(2)
Label11.Text = oku(3)
End If
End While
baglanti.Close()
End Sub
ÜSTAT SEN ADAMIN DİBİSİN YAA