تقييم الموضوع :
  • 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 
صلى الله على نبينا محمد
اخيكم / محمود صالح
  قال الزهري رحمه الله  
 مــا عُـــبـِد الله بشئ أفضل من العلم 
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف يمكن تلوين عدد من صفوف ListBox ؟ عبد الله 15 3,573 08-10-20, 01:24 PM
آخر رد: MetoDas
  [VB.NET] هل يمكن ارسال اشعار للمستخدمين ميدو الفنان 0 70 06-10-20, 05:49 PM
آخر رد: ميدو الفنان
  هل يمكن اضافة اشعار صوتى mostafa nada 3 207 22-09-20, 03:36 PM
آخر رد: mostafa nada
  [سؤال] هل يمكن تحويل مشروع الي ملف DLL saleh101 1 207 14-08-20, 02:14 AM
آخر رد: asemshahen5
  هل يمكن اضافة اكثر من tag فى ال button mostafa nada 11 863 06-08-20, 12:38 AM
آخر رد: mostafa nada
  [سؤال] هل يمكن عمل Trigger في قواعد بيانات Access + فيجوال بيسك محمد العامر 2 342 28-07-20, 01:45 AM
آخر رد: محمد العامر
  هل يمكن تحميل اسم قاعدة البيانات في جدول DataGridView أو لست بوكس المهنا 2 376 26-07-20, 11:46 PM
آخر رد: المهنا
  [سؤال] كيف يمكن نسخ ملف من أى مكان بالجهاز الى بارتشن C xprogrammer 0 184 20-07-20, 03:16 AM
آخر رد: xprogrammer
  هل يمكن حفظ الPrint Document بصيغة Pdf؟ Hazem1 2 315 06-07-20, 10:33 PM
آخر رد: Hazem1
  هل يمكن تحويل Print Document إلى PDF ؟ Hazem1 1 258 04-07-20, 11:36 AM
آخر رد: Hazem1

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


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