تقييم الموضوع :
  • 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 2 59 اليوم, 12:17 AM
آخر رد: ﻣﺒﺘﺪﺉ
  تجميع القيم للاصناف المتشابهة في مجموعة جداول khaled12345 2 51 أمس, 10:21 AM
آخر رد: khaled12345
  ارجو المساعدة فى تشغيل برنامج الحسابات هذا islam_zolek 2 90 17-11-17, 04:23 PM
آخر رد: islam_zolek
  [VB.NET] أرجوا المساعدة في حفظ الباركود داخل قاعدة البيانات abomo3ath 5 102 17-11-17, 02:45 PM
آخر رد: abomo3ath
  المساعدة في كود تصدير الجدول الي الاكسيل khaled12345 3 94 16-11-17, 11:38 PM
آخر رد: أحمد فتح الرحمن
  المساعدة في دمج المراسلات ( mail merge ) على ملف وورد باستخدام datagridview جيولوجي مبتدئ 3 80 12-11-17, 10:06 AM
آخر رد: جيولوجي مبتدئ
  ارجوا المساعدة في كود البحث هدا وجزاكم الله كل الخير محمود العجيلي 8 170 09-11-17, 10:05 PM
آخر رد: مهند بدران
  اضافة الصور في قاعدة بيانات SQl Server وفي اداة ListView - مع مشروع كامل مرفق للشرح - ارجوا المساعدة shado1796 50 7,835 09-11-17, 10:01 PM
آخر رد: مهند بدران
  المساعدة في تضبيط عرض Width اعمدة ال DataGridView khaled12345 2 105 06-11-17, 07:58 PM
آخر رد: khaled12345
  المساعدة في تصحيح الخطا في الكود khaled12345 2 82 30-10-17, 07:21 PM
آخر رد: khaled12345

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


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