السلام عليكم
أرجو ان تساعدوني هذه المرة في هذا الطلب البسيط ..
كيف يمكنني أن أعرف متغير x وادخل قيمته مثلا 2 في form1
بحيث يمكنني استخدامه في form2 ... بحيث اذا وضعت متغير x يعطيه تلقائئا القيمة 2 المدخلة في form1
وبارك الله فيكم ..
السلام عليكم
أرجو ان تساعدوني هذه المرة في هذا الطلب البسيط ..
كيف يمكنني أن أعرف متغير x وادخل قيمته مثلا 2 في form1
بحيث يمكنني استخدامه في form2 ... بحيث اذا وضعت متغير x يعطيه تلقائئا القيمة 2 المدخلة في form1
وبارك الله فيكم ..
السلام عليكم ورحمة الله تعالى وبركاته ...
أخي الكريم
إذا أردت الحفاظ على كل المتغيرات في برنامجك من خلال التنقل ما بين الفرورم فيجب عليك أن تستعمل
الموديل بحيث من خلاله
تقوم بالتصريح بالمتغيرات وكذلك الأوامر المشتركة بين الفورم بحيث تستطيع الإتصال بكل ماهو موجود في الموديل
مثلا
public x3 as integer ' module page wraiting ' private sub command1_onclick () x3 = 333 form2.show end sub ' in form2 ' private sub form2_onload msgbox x3 end sub
هنا تظهر قيمة المتغير رغم أن الفورم الظاهر فورم 2
حظ موفق أخي
الحاج نقبيل
برمجة عامة .
نعم كما قال الاخ الكريم
استخدم المديول في التعريف عن متغير
لجميع الفورمات ومرر له القيمة التي تريدها
ما شاء الله عنك أخي الحبيب الحاج
أولا بارك الله فيك ومشكور على الكود
أرجو منك أن توضح لي ماذا تقصد بالموديل فأخاف ان تكون المفاهيم عندي مختلفة ...
فأنا صراحة مبتدئ في الفيجوال مع أني أنجزت في برنامجي الشيء الكثير ولكن باستخدام أبسط الأوامر
أخي الحبيب ان أمكن أن تحل لي هذا المثال والذي أريد أن أعمله كمثال ..
عندي في form1 متغير اسمه z أضعه من خلال الأمر
Private Sub Command1_Click() z = 333 End Sub
وفي form2 أضع
Private Sub Command1_Click() Text1.Text = z End Sub
أريده في form2 ان يتعرف على قيمة z التي تدخل في form1 ويظهرها في text1
أرجو ان ترشدني بتوضيح أكثر ماذا أفعل وكيف أعرف الـ puplic variable
لأني حاولت أن أجرب الكود الذي وضعته فلم أنجح ..
السلام عليكم :
الموديول عباره عن مكان اخر يمكنك الاعلان فيه عن متغيرات واشياء اخرى .. ويمكن ادراج واحد من :
1- افتح قائمه Project
2- اختار Add Module
3- ثم اختار Ok
4- واعلان عن المتغيرات كما اخبرنا الاخ العزيز...وشكراا
“Any fool can make things bigger, more complex, and more violent”
هذا الموضوع مغلق.