yardımcı olmanızı rica ederim.
DoCmd.OpenForm "F_Uye", , , "[UyeNo]=" & [UyeNo_TXT], , , Me.UyeNo_TXT
Option Compare Database
Option Explicit
Private Sub UyeNo_DblClick(Cancel As Integer)
DoCmd.OpenForm "F_Uye", , , "[UyeNo]=" & [UyeNo_TXT], , , Me.UyeNo_TXT
End Sub