Tekrar merhaba,
Form üzerinde biri çıkış biri kayıt olmak üzere iki buton yaratıp aşağıdaki kodları yazdığımda problem çözüldü. Tekrar teşekkürler..
Private Sub Komut14_Click()
If Len([sayı]) = 6 Then
DoCmd.Save
Else
Me.sayı = ""
End If
End Sub
Private Sub Komut9_Click()
If Len([sayı]) <= 6 Or Len([sayı]) >= 6 Then
Me.sayı = ""
DoCmd.Close
Else
DoCmd.Close
End If
End Sub
ESC Butonu Hakkında
Bu Konudaki Yorumlar |
ESC Butonu Hakkında - Yazar: notrino - 13/06/2016, 18:40
Cvp: ESC Butonu Hakkında - Yazar: ozanakkaya - 13/06/2016, 19:29
Cvp: ESC Butonu Hakkında - Yazar: notrino - 13/06/2016, 22:42
Cvp: ESC Butonu Hakkında - Yazar: C*e*l*o*y*c*e - 14/06/2016, 03:31
Cvp: ESC Butonu Hakkında - Yazar: notrino - 14/06/2016, 13:31
Cvp: ESC Butonu Hakkında - Yazar: C*e*l*o*y*c*e - 14/06/2016, 13:48
Cvp: ESC Butonu Hakkında - Yazar: notrino - 14/06/2016, 14:26
Cvp: ESC Butonu Hakkında - Yazar: notrino - 14/06/2016, 15:22
Cvp: ESC Butonu Hakkında - Yazar: atoz112 - 14/06/2016, 16:58
Cvp: ESC Butonu Hakkında - Yazar: notrino - 14/06/2016, 19:38
|
Konuyu Okuyanlar: 1 Ziyaretçi