+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: altformun altformu (/konu-altformun-altformu.html)
Sayfalar:
1
2
Cvp: altformun altformu - Yandemir - 24/08/2011
tcno alanının on exit kısmına yani çıkıldığında olayına yazabilirsiniz.
Private Sub TcNo_Exit(Cancel As Integer)
If IsNull(Me.tsmno) or me.tsmno<>0 Then
Else
Me.TcNo = "X" & Format(Date, "mmdd") & Format(Time, "hhmmss")
End If
End Sub
Cvp: altformun altformu - yturan - 24/08/2011
Hocam, mükemmel olmuş... Elinize sağlık... Bitirince inşaalah paylaşırım herkesle...
Kolay gelsin...