برنامج لرصد الدرجات

[على المصري]

لو سمحت اريد معرفة أو تفسير هذا الكود وكيف استخدمة مع قاعدة البيانات

Private Sub Form_Timer()

Tim.Value = Time

Form.Caption = Mid((TT.Caption), 1, (Len(Form.Caption) + 1))

End Sub

[محمد ايمن]

أخي الكريم

ساشرح لك الكود السابق باختصار

الكود يقوم بعرض الوقت في مربع tim كما بتغيير النص الموجود أعلى النموذج وذلك من خلال مؤقت

السطر الأول ( حدث يتم تنفيذه عند المؤقت )

السطر الثاني ( يعرض الوقت في مربع tim )

السطر الثالث ( يحرك عنوان النموذج )