عبد الله فتحي

الضغط على الماوس يتم التعرف عليه من خلال الأحداث كالحدث MouseDown مثلاً، لاحظ أن هذا الحدث يعطينا معاملاً هو Button والذي من خلاله نعرف الزر المضغوط بالتفصيل .. والضغط المزدوج من خلال DblClick والسحب والإفلات DragDrop و DragOver وهكذا .. يمكنك تجريب بعض الأكوا…

تقصد مثل أرقام ال IP يوجد أكثر من طريقة لذلك وأعتقد أن ال regular expression هي الأفضل في مثل هذه الحالة سواء للتحقق أو التعرف على المدخلات عموماً هذه طريقة تقليدية على مربع نص عادي xa = InStr(1, Text1.Text, ",") Print "1 is: " & Mid(Text1.Text, 1, xa - 1) xb …

الأخ ناصر قام بوضع دورة كاملة للتعامل مع قواعد البيانات .. كما أنه يوجد دروس مفصلة أيضاً عن طرق الوصول إلى قواعد البيانات للأخ هيثم القلاف في قسم الدروس .. كود الربط لا يتجاوز الأربعة أسطر .. وفي الواقع لا يوجد ما هو أكثر تفصيلاً من الروابط التي ذكرها الإخوة س…

أهلاً أخي .. في العادة دائماً ما تكون هناك دالة API تقوم بعمل ذلك ،، ولكن من الصعب حصر وظائف هذه الدوال .. على أي حال أسهل طريقة للتعامل مع النظام هو الريجستري .. إذا كنت تريد تغيير مؤشر الماوس ستجد في الريجستري على المسار التالي HKEY_CURRENT_USER\Control Pane…

' ضع هذا الكود في ال Module Private Const SWP_HIDEWINDOW = &H80 Private Const SWP_SHOWWINDOW = &H40 Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Functio…

ممتاز .. بالتوفيق

أعتقد أن الأمر End يقوم بإزالة البرنامج كلية من الذاكرة قرأت سؤالك الآخر /index.php?showtopic=63306 ولكني قمت بتجربة ذلك وعملت برنامج صغير من ثلاث نماذج فتحتها جميعها وقمت بإغلاق أي واحدة منها بالأمر end لينتهي البرنامج تماماً ويزال من الذاكرة .. عما بأني جربت…

بارك الله فيك وفي إصرارك ..

كما ذكرت لك الاسم موحد في جميع الأربعة مربعات نص، ولمعرفة أي واحد منهم بالضبط استخدم index Label1.Caption = Text1(Index).Name & "No :" & index

لمعرفة اسم المربع استخدم الخاصية Name كالتالي: Label1.Caption = Text1(Index).Name ولكن لاحظ أن كل الأدوات هنا باسم واحد وبالتالي ستظهر جميعها Text1

أعتقد أنك تقصد محتوى مربع النص وليس اسمه لأن مثالك يحتوي على مصفوفة مربعات نصوص وهي بلاشك تحمل اسماً واحداً، ويمكنك الوصول إلى المربع المطلوب عن طريق الخاصية index للوصول إلى المحتوى استخدم هذا الكود في مثالك: Label1.Caption = Text1(Index).Text بالتوفيق

لا أعرف الرد للأسف لأني لم أستخدم هذه الأداة كثيراً .. ولكن هناك دورة للكريستال ريبورت تم الانتهاء منها وربما تجد فيها مبتغاك ..

أهلاً بك أخي حسن من جديد شكراً على الأداة وللأسف لم أستطع العثور على ما تريد ..

ربما لو وضحت السؤال نستطيع مساعدتك ..

أين سيتم عرض هذا الحقل على النموذج .. أقصد ما هي الأداة التي ستحمله ؟؟ أبسط مثال لو كان سيتم عرضه في مربع نص فسيكون عليك تغيير الخاصية PasswordChar لمربع النص إلى * ..

أولاً أهلا بك في المنتدى .. بخصوص السؤال فلا أظن أنه يمكن عمل ذلك .. والله أعلم .. أرى أنه من الأفضل لو قمت بتصميم نموذج إدخال خاص بك، وتقومين باستدعائه لاحقاً، لأن ذلك سيتيح لك خصائص أكثر .. بالتوفيق

حقيقة أخي عامر لا أعرف إذا كان هناك فرق جوهري بين الإصدارتين ولكنني جربت الإضافة إلى الإصدارتين بنفس الطريقة ولم تواجهني أي مشاكل TreeView1.Nodes.Add , , "Stamm", "Stamm" TreeView1.Nodes.Add "Stamm", 4, "Zweige", "Zweige"

تم إغلاق الموضوع نظراً لمخالفته لقوانين المنتدى .. في الحقيقة أخي المهنا أنت لست بجديد على الموقع وللأسف فإنك أكثر من يخالف القوانين في الفترة الأخيرة .. لا أعرف ما الذي تقصده بقولك " كارثة حقيقية " فأنا لا أرى أي كوارث، والحمد لله الأمور تسير على ما يرام .. ن…

بينما أجهز الرد قام الأخ النبهاني بالإجابة فجزاه الله كل الخير ..

أهلاً بك في منتدى الفيجول بيسيك :D أعتقد أن الأمر بسيط، يمكنك أولاً قراءة الموضوع الخاص بتحزيم البرامج على الرابط التالي: /index.php?showtopic=53834 مع العلم بأن النسخة المشروحة هي السادسة ولكن أعتقد أن السابعة لن تختلف كثيراً في النسخ السادسة وبعد إرفاق الملف…