AccessTr.neT

Merhaba Arkadaşlar,

ufak bir sorum olacak. ek'te örneğini verdiğim tarzda bir çalışma yapıyorum. stoktan fazla çıkış yaptığında stok yetersiz uyarısını verdirdim fakat hatalı olan metin kutusuna otomatik olarak gitmek istiyorum. nasıl yapabilirim. 

Kodu aşağıdaki ile değiştirerek deneyiniz.

If Me.CIKIS > Me.STOKMIK Then

MsgBox ("YETERLİ STOK YOK")

Me.Kimlik.SetFocus

Me.CIKIS.SetFocus

End If

msgboxtan sonra geçiş yapması için önce me.kimlik.setfocus kodu ekledim.

Teşekkür ederim işime yaradı. hayırlı akşamlar.

Benimde çok yaradı Teşekkürler hocam..