Private Sub Açilan_Kutu0_Click()
Açilan_Kutu0.SetFocus
Metin2.Text = "select Adres from Musteri where Unvan='" & Açilan_Kutu0.Text & "'"
End Sub
Denetimin üzerinde odak olmadıkça bir denetimin bir özelliğine başvuramaz veya özelliği ayarlayamazsınız hatası alıyorum bu kodda,setfocus yaptığım halde.
