اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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


Private Sub Form_Timer()

Tim.Value = Time

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

End Sub

قام بنشر

أخي الكريم

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

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

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

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

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information