Butona tıklayınca uyarı mesajı çıksın

[doktor]

Arkadaşlar

Accesste bir program yapmaya çalışıyorum.Bu programda bir geçiş panosu var.Bu geçiş panosunun bir butonuna tıklayınca istediğim bir uyarı mesajını vermesini istiyorum.Mesela raporlar bölümünde iki tarih arası yapılan işlemler butonuna tıklayınca "lütfen tarih aralığı giriniz" şeklinde bir mesaj çıkmasını istiyorum.Programın ilgili kısmını ekledim.

Yardımlarınızı bekliyorum.İyi çalışmalar....

 

[doktor]

Soruma şunu da eklemek istiyorum.Butona tıklayınca verilen uyarı ile ilgili işlem yapılmadan o buton işlem yapmasın.Mümkünse bu konuda da yardımınızı bekliyorum.

 

[TURISSEMOS]

If(IsNull(Tarıh1 And Tarıh2 Then
MsgBox"Tarih alanı boş olamaz."
End If

 

[ayhan2122]

Sn doktor;

Geçiş Panosu formuna bir düğme ekleyin ve düğmenin olay yordamında
Private Sub ile End Sub satırları arasına:

If (MsgBox("Form açılacak. Devam etmek için 'Tamam'ı tıklayınız.", 1) = 1)
Then

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "BurayaAçılacakFormunAdınıYazınız"
DoCmd.OpenForm stDocName, , , stLinkCriteria

End if
yazınız.