احبتي تبين المشكله بالكود
Select Case MbAll
Case 1
T = DateAdd("m", "-12", Date)
Case 2
T = DateAdd("m", "-6", Date)
Case 3
T = DateAdd("m", "-3", Date)
Case 4
T = DateAdd("m", "-1", Date)
End Select
total.Visible = True
Me.TB.Requery
Call dom_zr5_Click
End Sub
المطلوب داله جديده تحويل الديت الي في الويندوز من هجري اوعبري الي ميلادي
تحياتي