18-06-13, 12:40 PM
واذا كان المطلوب طرح تاريخين من بعض
text3.text=a-b فس هذا الكود
A = CDate(Text1.Text)
B =CDate(Text2.Text)
Text3.Text =Day(A) & "/" & Month(B) & "/" & Year(A)
text3.text=a-b فس هذا الكود
A = CDate(Text1.Text)
B =CDate(Text2.Text)
Text3.Text =Day(A) & "/" & Month(B) & "/" & Year(A)
