اريد الفارق بين تاريخيين تكست بوكس

[محمد الورفلي1]

السلام عليكم

اريد الفارق بين تاريخيين عن طريق الكود

يعني طرح التاريخ الثاني من الاول

 

 

222.rar

[سليم حاصبيا]

جرب هذه الكود لزر التنفيذ

Private Sub CommandButton1_Click()
On Error Resume Next
m = CDate(TextBox1.Value): n = CDate(TextBox2.Value)
        If IsEmpty(m) Then
            TextBox1.Value = ""
            TextBox1.SetFocus
            Exit Sub
         End If
         
        If IsEmpty(n) Then
            TextBox2.Value = ""
             TextBox2.SetFocus
             Exit Sub
         End If
  TextBox3 = m - n
End Sub

 

[محمد الورفلي1]

شكراً استاذ سليم