Sayın Kadir bey,
Sayın Hegunun çalışmasından aldığım kod aşağıdadır,ancak arama yaptıktan sonra arama metin kutusunda metin kalıyor,ikinci bir arama yapacağım zaman önceki metini temizlemek zorunda kalıyorum,bunu önlemenin yolu varmı.
Saygılar.
Private Sub Komut75_Click()
If IsNull([mtn_MUSTERIADI]) Then
MsgBox "Arma yapmak için Lütfen Müşteri Adı Soyadı yazınız."
Me.mtn_MUSTERIADI.SetFocus
Else
Dim strLinkCriteria
strLinkCriteria = "[MUSTERIADI] Like '*" & Me.mtn_MUSTERIADI & "*'"
DoCmd.OpenForm "F_MUSTERIKAYIT", , , strLinkCriteria
End If
End Sub
Adı Soyadı:
Fa.... Aş....
Yaşı:
69
Konum:
Muğla
Ofis Versiyonu:
Ofis 2003
Son Oturumu:
18/05/2022,17:45
Yorumları:
1.016
Konuları:
203
Kayıt Tarihi:
18/09/2010
Teşekkür Puanı:
176
Mesleğiniz:
Emekli_Turizm
Cevapla