انا قاعد اصمم برنامج بالفيجوال وابغاه اول ما يشتغل يسوي امرين الاول يتفعل والثاني يتفعل بعده ب ثانيتين مثلا
زي كذا للمثال :
Private Sub Form_Load() form1.hide form2.show End Sub
الحين ابغا امر form2.show يشتغل بعد حوالي ثانيتين او ثلاث ثواني
فياريت احد يعلمني كيف طريقتها
ولكم جزيل الشكر
تحياتي
أخي K.I.D :
أولاً اهلاً بك في منتدى الفريق العربي للبرمجة
ثانياً قد يفيدكم هذا الكود
[code
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Form_Load()
form1.hide
sleep 2000
form2.show
]end sub
حيث 2000 تعني ثانيتين (أدخل الزمن بالثانية مضروياً بأـلف)
تم تعديل هذه المشاركة بواسطة 007GB في 15 سبتمبر 2006 في 13:01
المستبد يتحكم في شؤون الناس بإرادته لا بإرادتهم و يحكمهم بهواه لا بشريعتهم و يعلم من نفسه أنه الغاصب المتعدي فيضع كعب رجله على أفواه الملايين من الناس يسدها عن النطق بالحق و التداعي لمطالبته
السلام عليكم اخي
هذي من اسهل الامور
اولا اضف اداة التايمر في الفورم الاولى
و اجعل ال interval
2000
اذا تبغاها بعد ثانيتين
او 3000
اذا تبغاها بعد ثلاث ثواني
و ثم اذهب الى الكود الخاص بالتايمر
واكتب
form1.hide
form2.show
وشكرا
اخبرني ماذا حصل معك وشكرا
تحياتي
ابــــــــــــــــــن عماد
في يوم من الايام قال Matrixyb
" فكر في طريقة حماية لبرامجك و فكر اذا انت واجهتها كيف ممكن تكسرها اذا لقيت طريقة لكسرها دور طريقة حماية اخرى "
شكرا لك يا 007GB ولك يا ابن عماد
ولقداشتغلت الطريقة الاولي بشكل ممتاز
ولكن الطريقة الثانية ما فهمت عليها
وشكرا لكم
form_load() dim x as integer x=(x+timer1.value)/1000 if x=2 then form1.hide end if if x=3 then form2.show end if end sub [code/] جرب ذلك قد ينجح
لا استطيع الدخول بمعرفي كمشرف..هذا معرف سابق استرجعت كلمة المرور له
اشك ان عضويتي كمشرف حذفت
هذا الموضوع مغلق.
المتواجدون خلال آخر ساعة · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
