تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تحويل الحروف الصغيره إلى كبيره
#1
مساء  الخير 
أريد  كود يقوم  بتحويل  كل الحروف  الي ادخلها  في textbox1  من أحرف صغيره  إلى أحرف  كبيره  تظهر  في  textbox2  باستخدام   الدوال asc و chr  أي عن طريق  قمه  الاسكي  لكل حرف  مدخل
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم
جرب الكود التالي:
PHP كود :
Dim schar As Char
        For Each schar In TextBox1
.Text
            If Asc
(schar) >= 97 AndAlso Asc(schar) <= 122 Then
                TextBox2
.Text &= (Chr(Asc(schar) - 32))
 
           Else
                TextBox2
.Text &= schar
            End 
If
 
       Next 

تحياتي ..
الرد }}}}
تم الشكر بواسطة: hano
#3
(12-10-16, 06:11 PM)ابراهيم النعيمي كتب : السلام عليكم
جرب الكود التالي:
PHP كود :
Dim schar As Char
        For Each schar In TextBox1
.Text
            If Asc
(schar) >= 97 AndAlso Asc(schar) <= 122 Then
                TextBox2
.Text &= (Chr(Asc(schar) - 32))
 
           Else
                TextBox2
.Text &= schar
            End 
If
 
       Next 

تحياتي ..
شكرا تنفذ صح
بس اذا أريده كا سترنك  أكدر لو لا وشلون يصير الكود اذا سترنك
ليش قبل اليساوي & اني طالبه  بعدني  وماعرف  كولش  vb.net
الرد }}}}
تم الشكر بواسطة:
#4
اذا (String) يكون اسهل بس انتي طلبتي استخدام الدالتين (Chr و  Asc) 
إقتباس :باستخدام   الدوال asc و chr  أي عن طريق  قمه  الاسكي  لكل حرف  مدخل

على العموم اذا تريدين كـ (String) راح يكون الكود كالتالي:

PHP كود :
TextBox2.Text TextBox.1.Text.ToUpper 
اما استخدام الرمز (&) قبل علامة (=) فهو لجمع الرموز في نص واحد بمعنى انه في كل مرة تتكرر الـ (Loop) يكون النص يساوي النص القديم زائد الحرف الجديد و في نهاية الدورة يكون لدينا نص كامل مجمع من حروف متفرقة .. ارجو ان اكون وضحت الفكرة

تحياتي ..
الرد }}}}
تم الشكر بواسطة: hano , myalsailamy
#5
(12-10-16, 07:58 PM)ابراهيم النعيمي كتب : اذا (String) يكون اسهل بس انتي طلبتي استخدام الدالتين (Chr و  Asc) 
إقتباس :باستخدام   الدوال asc و chr  أي عن طريق  قمه  الاسكي  لكل حرف  مدخل

على العموم اذا تريدين كـ (String) راح يكون الكود كالتالي:

PHP كود :
TextBox2.Text TextBox.1.Text.ToUpper 
اما استخدام الرمز (&) قبل علامة (=) فهو لجمع الرموز في نص واحد بمعنى انه في كل مرة تتكرر الـ (Loop) يكون النص يساوي النص القديم زائد الحرف الجديد و في نهاية الدورة يكون لدينا نص كامل مجمع من حروف متفرقة .. ارجو ان اكون وضحت الفكرة

تحياتي ..

(12-10-16, 08:16 PM)hano كتب :
(12-10-16, 07:58 PM)ابراهيم النعيمي كتب : اذا (String) يكون اسهل بس انتي طلبتي استخدام الدالتين (Chr و  Asc) 
إقتباس :باستخدام   الدوال asc و chr  أي عن طريق  قمه  الاسكي  لكل حرف  مدخل

على العموم اذا تريدين كـ (String) راح يكون الكود كالتالي:

PHP كود :
TextBox2.Text TextBox.1.Text.ToUpper 
اما استخدام الرمز (&) قبل علامة (=) فهو لجمع الرموز في نص واحد بمعنى انه في كل مرة تتكرر الـ (Loop) يكون النص يساوي النص القديم زائد الحرف الجديد و في نهاية الدورة يكون لدينا نص كامل مجمع من حروف متفرقة .. ارجو ان اكون وضحت الفكرة

تحياتي ..
شكرا تعبتك
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفية تحويل كود اكسلvba الى فيجوال بيسك farhat 3 54 منذ 7 ساعة مضت
آخر رد: thevirus
  تقسيم الحروف و اظهارهن في مسج بزك على التوالي Basil Abdallah 1 20 منذ 11 ساعة مضت
آخر رد: مساعدة
  [سؤال] تحويل رقم farhat 3 60 أمس, 04:25 PM
آخر رد: farhat
  مشكلة ف الحفظ والتعديل بعد تحويل المشروع لملف تنفيذي apo yousef 3 92 23-02-17, 12:28 PM
آخر رد: ssayed111
  تحويل الارقام الي حروف محمد بوقزاحة 6 218 22-01-17, 05:01 PM
آخر رد: tryold
  [VB.NET] مشكلة تحويل من 32بت الى 64 بت yemen1 3 135 08-01-17, 01:23 PM
آخر رد: yemen1
  [VB.NET] مساعدة في تحويل كود من php الى vb.net dubai.eig 8 228 23-12-16, 01:29 AM
آخر رد: dubai.eig
  [VB.NET] تحويل التاريخ لسلسلة نصية tifagreet 1 189 01-11-16, 01:28 PM
آخر رد: ممدوح
Information [VB.NET] خطاء في الكرستال ريبورت عند تحويل قاعدة البيانات من اكسس إلى ميسكوال 3msoft 2 174 22-10-16, 11:49 PM
آخر رد: 3msoft
  [سؤال] مساعدة في تحويل المشروع من VB6 الى الدونت نت عبدالرحمن المكاوي 8 397 09-10-16, 06:21 PM
آخر رد: أبو عمر

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


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