تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[كود] المرجو المساعدة في مجموعة من الأكواد
#1
السلام عليكم ورحمة الله وبركاته.
المرجو المساعدة في مجموعة من الأسئلة

-السؤال الأول:
قمت بتصميم برنامج يحتوي على Textbox1 و Textbox2 واريد عند الكتابة في Textbox1 تظهر هذه الكتابة تلقائيا في Textbox2 بدون الضغط على أي زر

-السؤال الثاني:
كيفية جعل Textbox يقبل الحروف العربية فقط

-السؤال الثالث:
كيفية جعل Textbox يقبل الحروف الانجليزية فقط

-السؤال الرابع:
عند الكتابة في Textbox كيف يمكن تحويل الحرف الأول من الكلمة إلى حرف كبير تلقائيا

-السؤال الخامس:
قمت بتصميم برنامج يطلب من المستخدم ادخال الاسم العائلي والاسم الشخصي ورقم الهاتف قمت بربط هذاالبرنامج بقاعدة بيانات Access التي هي مربوطة بدورها مع ملف وورد عن طريق أداة في الوورد اسمها Mail Merge اريد كود عند ادخال البيانات والضغط على زر يتم طباعة ملف الوورد يحتوي على البيانات التي أدخلها المستخدم

وشكرا مسبقا على المساعدة
الرد
تم الشكر بواسطة:
#2
السلام عليكم
بالنسبة لل textbox2.text
اجعل الكود هكذا textbox2.text=textbox1.text
يجب ان يكون هذا الكود في حدث الصندوق الثاني
الرد
تم الشكر بواسطة: abdelvb
#3
(03-01-15, 01:12 AM)محمود اكرم كتب : السلام عليكم
بالنسبة لل textbox2.text
اجعل الكود هكذا textbox2.text=textbox1.text
يجب ان يكون هذا الكود في حدث الصندوق الثاني

اسف لم يعمل الكود
الرد
تم الشكر بواسطة:
#4
وعليكم السلام ورحمة الله وبركاتة ,

اخي الكريم بالنسبة للسؤال الاول الطريقة كالتالي

اضغط على Textbox1 مرتين او بالاصح في حدث TextChange

وضع هذا الكود

كود :
Textbox2.Text = Textbox1.Text

الكود يعمل 100%

الطلب الثاني والثالث لا اعلم آنتظر الاعضاء الآخرين

الطلب الرابع : اضغط على TextBox مرتين وضع به هذه الاكواد

كود :
       On Error Resume Next
       Dim upper As String = Nothing
       upper = TextBox1.Text.ElementAt(0).ToString.ToUpper
       TextBox1.Text = TextBox1.Text.Replace(TextBox1.Text.ElementAt(0), upper)
       TextBox1.Select(TextBox1.TextLength, 0)

ولا تنسى تغير اسم TextBox1 اذا كان اسمة غير عندك

بالنسبة للطلب الخامس انتظر باقي الاعضاء

ارجو ان اكون افدتك ولو بالقليل , تحياتي
الرد
تم الشكر بواسطة: abdelvb
#5
(03-01-15, 07:37 AM)undetected71 كتب : وعليكم السلام ورحمة الله وبركاتة ,

اخي الكريم بالنسبة للسؤال الاول الطريقة كالتالي

اضغط على Textbox1 مرتين او بالاصح في حدث TextChange

وضع هذا الكود


كود :
Textbox2.Text = Textbox1.Text

الكود يعمل 100%

الطلب الثاني والثالث لا اعلم آنتظر الاعضاء الآخرين

الطلب الرابع : اضغط على TextBox مرتين وضع به هذه الاكواد


كود :
       On Error Resume Next
       Dim upper As String = Nothing
       upper = TextBox1.Text.ElementAt(0).ToString.ToUpper
       TextBox1.Text = TextBox1.Text.Replace(TextBox1.Text.ElementAt(0), upper)
       TextBox1.Select(TextBox1.TextLength, 0)

ولا تنسى تغير اسم TextBox1 اذا كان اسمة غير عندك

بالنسبة للطلب الخامس انتظر باقي الاعضاء

ارجو ان اكون افدتك ولو بالقليل , تحياتي

شكرا الأكواد تعمل 100%
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] شباب انا جديد هنا احتاج المساعدة في الفيجوال ادرس في المانيا informatikkaufmann ٍSaeid 0 23 منذ 3 ساعة مضت
آخر رد: ٍSaeid
  المساعدة - في حل مشكلة حجم الفورم Mohamed El Meziani 1 66 18-04-18, 02:39 AM
آخر رد: ملهمـ
  [VB.NET] كيف تطبيق مجموعة اكواد في نفس الثانية saudisgames 2 104 05-04-18, 09:18 PM
آخر رد: عبدالله الدوسري
  [مشروع] مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة الحسين احمد 11 381 02-04-18, 03:32 PM
آخر رد: عبدالله الدوسري
  السادة الافاضل أرجو المساعدة للضرورة القصوة "كود حفظ صورة من ويب كام مباشرة " nohadking 1 78 22-03-18, 11:00 AM
آخر رد: silverlight
  [سؤال] مشكلة في ربط قاعدة بيانات مع فيوال بيسك \الرجاء المساعدة :"( cayo12300 3 111 19-03-18, 08:37 PM
آخر رد: عبدالله الدوسري
  [مشروع] مشكلة في جملة Select لمشروع تسديدات شهرية ارجو المساعدة من كل ذوي الخبرة الحسين احمد 0 59 19-03-18, 06:11 AM
آخر رد: الحسين احمد
  المساعدة في إيجاد حل كود للجريدفيو مرفق مثال بيسك لكل العرب 4 157 05-03-18, 07:23 PM
آخر رد: بيسك لكل العرب
  المساعدة - في تفعيل نسخة VB 2015 emamtron2014 1 42 26-02-18, 07:10 AM
آخر رد: emamtron2014
  المساعدة بزر حذف العيدروس 13 36 26-02-18, 12:41 AM
آخر رد: العيدروس

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم