Arkadaslar Merhaba,

asagida ki kod da INPUT a tarih giriliyor, eger kullanici tarih degilde metin girerse yada tarih disinda bir bilgi girdigi zaman mseaj olarak uyari versin " lutfen girdiginiz bilgileri kontrol ediniz" gibi, bunu nasil yapabilirim.

Private Sub Form_Open(Cancel As Integer)

  

strDate = InputBox("Lutfen Puantaj Giris Tarihini Giriniz!!!", "Main Database") ',Format(Now() - 1, "dd/mm/yy"))

    

If strDate = "" Then Cancel = True: Exit Sub

If CDate(strDate) < Now() - 7 Or CDate(strDate) > Now() Then MsgBox strDate & " is wrong date.You can't enter this date", vbCritical: Cancel = True: Exit Sub

              

    strDate = Format(strDate, "MM/dd/yyyy")



    Me![Tarih].DefaultValue = "#" & strDate & "#"

    

        TimerStartTime = Now()

           

    End Sub

ilginiz icin simdiden cok tesekkur ederim.

Saygilar,

Subco


d Sub