الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اسئلة ارجو الاجابة عليها

بدأه yms12 في 22 يناير 2009 · 7 رد · 627 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

و(س)

الي الاخوة الاعزء مشرفي هذا المنتدى العظيم ارجو المساعدة في لاجابة على بعض الاسئلة التي واجهتني ولم اجد لها حل بالرغم من البحث الكثير في المنتدى عليها ولم اجد الاجابة الشافية

اولا: اريد التنقل بين الحقول بمفتاح الانتر بدل التاب وللعلم وجد كود ولكن لا يعمل عندما جربة

ثانيا: اريد قناع للتاريخ بحيث يكون في حقل التاريخ-البوكس- / / هذاالشكل ويدخل المستخدم ارقام التاريخ فقط

ثالثا: كيف اجعل النموذج في حجم التكبير دائما عندما افتح نموذج بحجم اصغر بوعد الاغلاق اجد النموذج يضغر اريد ان يكون في حجم التكبير دائما

اخيرا اشكركم وادهو الله لكم بالتوفيق

#2

1- اضبط خاصية Tab Action إلى 3، Grid Navigation ثم اكتب الكود التالي في حدث KeyPress :

  1.  
  2. If KeyAscii = 13 Then
  3. SendKeys("Tab")
  4. End if
  5.  

انتبه إلى ضبط الخاصية أولاً.

3- لم أفهم الثالث كثيراً ، ولكن اضبط خاصية Window State إلى Maximized ، هل هذا ما تريده؟ إذا لم يكن هو فأرجو التوضيح أكثر.

بالنسبة للسؤال الثاني، انتظرني لأفكر في خوارزميته

هذه الجملة خاطئة  :wacko: 


#3

ردا على السؤال الأول .. قم بتغيير الخاصية KeyPreview إلى True بوضع هذا الـ Code في الحدث Load للـ Form

Me.KeyPreview = True

وضع هذا الـ Code أيضا في حدث الـ KeyDown للـ Form

If KeyCode = 13 Then Call SendKeys("{Tab}")

وردا على السؤال الثاني وبخصوص الـ Mask .. قم بإستخدام الـ MaskEdBox

إذهب إلى إضافة Component وإبحث عن Microsoft Masked Edit Control .. ثم قم بتحميله وإضافته الى الـ Form

وإذا أردنا على سبيل المثال ظبط الـ Format إلى "YYYY/MM/DD" فيجب ظبط الـ Mask إلى "####/##/##" .. أي هكذا بإستخدام الكود


MaskEdBox1.Mask = "####/##/##"
MaskEdBox1.Format = "YYYY/MM/DD"

والسؤال الثالث غير مفهوم

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

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#4

الشكر الجزيل لكل الاخوة على الرد الشكر لأخ abbooodd و الاخ mrx_ta7ady والذي قمت بعمل الرد الذي قام به والحمد لله نجحت اولاً وتم التنقل بالانتر

ثانيا: فعلاً تم عمل الماسك ولكن شكل الماسك يتم ادخال التاريخ السنه /الشهر/اليوم من الشمال وانا اريد الادخال من اليمين الى اليسار

اما ثالثا: هي ان النموذج الاصلي هو ابن للنموذج mdi ويوجد نموذج اخر يظهر به بيانات يتم الاختيار منها فبعد فتح النموذج الابن هذا واريد احضار بيانات من النموذج الثالث وبعد اغلاقة يضغر النموذج الثاني وانا عامل في windowsstate على الاختيار الثالثmax

#5

بالنسبة للثانيا في المشاركة السابقة فالرد هو بإمكانك تفصيل أي تنسيق كما يليق لك وهذا إذا علمت الآتي :

  • yyyy = السنة ( أي إذا كانت السنة الحالية تكون 2009 )
  • yy = السنة ( أي إذا كانت السنة الحالية تكون 09 )
  • MMMM = الشهر ( أي اذا كان شهر يناير يكون بإسمه يناير )
  • MM = الشهر ( أي اذا كان شهر يناير يكون 01)
  • M = الشهر ( أي اذا كان شهر يناير يكون 1 )
  • dddd = اليوم ( أي اذا كان اليوم الأول في الشهر يكون مثلا السبت )
  • dd = اليوم ( أي اذا كان اليوم الأول في الشهر يكون 01 )
  • d = اليوم ( أي اذا كان اليوم الأول في الشهر يكون 1 )

وبعد تفصيل التنسيق المناسب يجب وضع الـ Mask بنفس طريقة الـ Format مع إستبدال الحروف حاملة المعنى بالرمز #

وبالنسبة للثالثا فالـ Max في الـ WindowState للتكبير وليس للتصغير .. أيضا يجب ان تعلم الآتي :

  • الإختيار الأول قيمته 0 أي Normal أي الوضع العادي


  • الإختيار الثاني قيمته 1 أي Minimize أي الوضع المصغر للشاشة


  • الإختيار الثالث قيمته 2 أي Maximize أي الوضع المكبر للشاشة

ونصيحة مني ان تقوم بوضع كود لإغلاق شاشة إستحضار البيانات في الحدث DeActivate للـ Form نفسه

كما تضع نفس الـ Code عند الضغط على زر الـ Esc للشاشات سالفة الذكر

وإيضا عند إنتهاء مهمتها ونقل البيانات للشاشة التي تسبقها

وهذا لأن هذه الشاشات تكون وظائفها مؤقتا ولا يجب ان تطيل عن إستحضار بيان معين

وبالتوفيق إن شاء الله

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

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#6

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه /الاخ الكريم mrx_ta7ady اعتذر لك على الازعاج ولكن حتى لا اضيع وقتك ارسل لك مرفق ارجو التعديل لية بالنسبة لتنسيق التاريخ بحيث اكتب من اليمين وبالنسبة لتصغير الشاشة واضح اذا استخدمت المثال في اختيار العيادة والطبيب وشكرا

test.rar

#7

هل تتحدث عن محاذاة الأداة ؟؟ أم ظبط التنسيق ؟؟

على كل التعديل في المرفقات وأتمنى اكون فهمت صح المره دي

YMS12.rar

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

فليقبل الجميع تقديري واحترامي .. ولكم تحياتي

#8

اشكرك جزيلا وجزاك الله خيرا

انت رائع

واسف على عدم توضيحي لكل وعدم مقدرتي لطرح سؤالى بالشكل الصحيح تعبتك معي ولكن جزاء عند الله خيرا ان شاء الله

مواضيع مشابهة