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