مساء الخير
أريد كود يقوم بتحويل كل الحروف الي ادخلها في textbox1 من أحرف صغيره إلى أحرف كبيره تظهر في textbox2 باستخدام الدوال asc و chr أي عن طريق قمه الاسكي لكل حرف مدخل
(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
اذا (String) يكون اسهل بس انتي طلبتي استخدام الدالتين (Chr و Asc)
إقتباس :باستخدام الدوال asc و chr أي عن طريق قمه الاسكي لكل حرف مدخل
على العموم اذا تريدين كـ (String) راح يكون الكود كالتالي:
PHP كود :
TextBox2.Text = TextBox.1.Text.ToUpper
اما استخدام الرمز (&) قبل علامة (=) فهو لجمع الرموز في نص واحد بمعنى انه في كل مرة تتكرر الـ (Loop) يكون النص يساوي النص القديم زائد الحرف الجديد و في نهاية الدورة يكون لدينا نص كامل مجمع من حروف متفرقة .. ارجو ان اكون وضحت الفكرة
تحياتي ..