AccessTr.neT

Tam Versiyon: Depo Hareketleri, Seri No Takibi ve Garanti belgesi basımı
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Mesage box ekleyerek çözdüm teşekkürler

Private Sub Form_BeforeInsert(Cancel As Integer)
If Me.Metin7.Value < KayitSayisi Then
Form.AllowAdditions = True
Else
Form.AllowAdditions = False
MsgBox ("Seri Numaraları Tamamlandı")
End If
End Sub
Sayfalar: 1 2