Function BilgiAl()
DoCmd.OpenForm "F_0_MemberTaransferAccount"
With Form_F_0_MemberTaransferAccount
.txtUyeNo = Form_SF_1AF.Controls("UyeNo")
.txtUyeAdiSoyadi = Form_SF_1AF.Controls("UyeAdiSoyadi")
.txtIslemTuru = ""
.txtTutar = ""
.txtTarih = ""
End With
End Function
harika bu kod calisti. uygulamak daha az zahmetli ve daha anlasilir oldu kodu okumak daha kolay.
Access Çekirgesi
![[Resim: img-cray.gif]](https://www.accesstr.net/images/smilies/img-cray.gif)
![[Resim: img-cray.gif]](https://www.accesstr.net/images/smilies/img-cray.gif)