yalnız şurada bir hata var. metin kutusuna veri giriyorum buton aktifleşiyor butonda da openform özelliği var form açıldıktan sonra veri siliniyor. yani metin kutusunda bulunan veri boşalmış oluyor.

sayın kemiksizm,

sorunu yaşadığınız uygulamanızı ekleyebilir misiniz lütfen.teşekkürler.

iyi çalışmalar,
saygılar.

sayın kemiksizm,

yeni bir çalışma yaptınız mı bilmiyorum fakat ben bu bahsettiğiniz duruma dair,eski eklediğiniz örneğinizden bir çalışma hazırladım.inceleyebilirsiniz.

iyi çalışmalar,
saygılar.

farklı bir çalışma yaptım butonu pasifleştirmektense

Private Sub Komut2_Click()

If IsNull(Me.Metin0) Then

MsgBox "Lütfen Bilgilerden en az T.C. Kimlik No. Giriniz..", , "Tahkikat Programı"

Else

    stDocName = "supavsiz"

    DoCmd.OpenForm stDocName, , , stLinkCriteria

End If

End Sub

diye kod hazırladım böylece doğal olarak pasif oldu ama sizin kodlarınızdan yararladınmış oldum saolun