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

لدي صندوق نص TextBox1 يحتوي على نص عربي "كن جميلا ترى الوجود جميلا"

أريد أن يتم تحويل هذا النص إلى شفرات ينكود مثل هذه:

\U+fee6\U+fedb\U+0020\U+fefc\U+fef4\U+fee4\U+fe9f\U+0020\U+0649\U+feae\U+fe97\U+0020\U+062f\U+feee\U+fe9f\U

Idea هل هناك دالة أو طريقة لعمل ذلك ..

ولكم جزيل الشكر
الرد }}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة اللة وبركاته

كود :
Dim MyArabicText As String = "ضع الكلام هنا"
Dim Output As String
For Each Chrstr As Char In MyArabicText
Output &= "U+" & CInt((Chrstr)c)).ToString("X4")) & "/"
Next

Msgbox ( Output)

جرب الكود كتبتة على السريع بالهاتف لاني بالخارج.
لم اجرب الكود .
الرد }}}
تم الشكر بواسطة:
#3
اطلعي

http://arabteam2000-forum.com/index.php?...9-unicode/

وممكن تستخدمي كود استاذ [b]عبدالله الدوسري[/b]
وتكوني شفرات خاصة بكي كمثال ضعي اثنان (textbox)


PHP كود :
   Private Sub TextBox1_TextChanged(sender As ObjectAs EventArgsHandles TextBox1.TextChanged
        Dim Output 
As String
        For Each Chrstr 
As Char In TextBox1.Text
            Output 
&= conv_txt(Chrstr)
 
       Next
        TextBox2
.Text Output
    End Sub
    Function conv_txt
(ByVal str As String)
 
       Dim Out_txt As String
        Select 
Case str
            Case Is 
"ا"
 
               Out_txt "x-opu"
 
           Case Is "ب"
 
               Out_txt "x-lkj"
 
           Case Is "ج"
 
               Out_txt "x-vbn"
 
       End Select
        Return Out_txt
    End 
Function 
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Exclamation [سؤال] كيف يمكن الغاء السوال عند الكتابة على ملف موجود dell 0 48 19-03-24, 01:23 AM
آخر رد: dell
  [VB.NET] كيف يمكن إخفاء ظهور الشاشة السوداء فى الـــ console AmeenRashed 2 316 15-11-23, 03:51 PM
آخر رد: justforit
  ما أسرع استضافة يمكن رفع المشروع عليها ؟ hazim1 0 197 03-10-23, 08:55 AM
آخر رد: hazim1
  كيف يمكن تأخير الـSplash Screen حتى يتم تحميل الأدوات بالكامل؟ hazim1 0 270 28-09-23, 08:23 AM
آخر رد: hazim1
  هل يمكن نسخ احتياطي لأسماء الButtons ؟ hazim1 2 238 21-09-23, 07:32 PM
آخر رد: hazim1
  كيف الحصول على قيمة الخلية بعد تحديد الصف في datagridview؟ hazim1 2 558 06-08-23, 01:12 AM
آخر رد: hazim1
  هل يمكن عد الصفوف التالية للصف المُحدد في Datagridview ؟ hazim1 1 460 17-07-23, 09:04 PM
آخر رد: mrfenix93
  لا استطيع الحصول على الرقم التسلسلي للقرص C ابو محمد محمد محمد 6 737 27-04-23, 01:49 PM
آخر رد: ابو محمد محمد محمد
  [SQL] كيف يمكن تعديل update أو حذف delete صف معين من جدول بدلالة رقم الصف ROW_NUMBER mmaalmesry 4 759 06-02-23, 09:42 AM
آخر رد: mmaalmesry
  [VB.NET] كيف يمكن تنفيذ امر داخل الباور شل zooz313 2 775 17-12-22, 02:25 PM
آخر رد: kebboud

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


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