(14/05/2019, 15:36)haliliyas yazdı: sipariş formuna "CBCari" bir açılır kutu ekleyip
değiştiğinde olayına aşağıdaki kodu yazıp dener misiniz
çıkıldığında olayına parametre formundaki gibi bir kod tanılamanız yterli olur sanırımPrivate Sub CBCari_Change()
Dim CBSQL As String
Me.CBCari.RowSource = ""
CBSQL = " SELECT tblCari.CariUnvani " & _
" FROM tblCari " & _
" WHERE (((tblCari.CariUnvani) Like '*" & CBCari.Text & "*')) " & _
" ORDER BY tblCari.CariUnvani;"
Me.CBCari.RowSource = CBSQL
End Sub
halil bey selam
dediğiniz şekilde yaptım ama olmadı sanırım. örnekle gönderebilir misiniz? daha rahat anlarım sanırım )