19-03-20, 08:50 PM
19-03-20, 09:22 PM
PHP كود :
Private Sub Command1_Click()
Text2.Text = CDate(Text1.Text) - 1
End Sub
Private Sub Form_Load()
Text1.Text = Date
End Sub
PHP كود :
Private Sub Command1_Click()
Text2.Text = DateAdd("d", -1, Text1.Text)
End Sub
Private Sub Form_Load()
Text1.Text = Date
End Sub
d=يوم
m=شهر
yyyy=سنة
19-03-20, 09:42 PM
19-03-20, 09:48 PM