كيفية قراءة وعرض سلسلة UNICODE في نموذج Visual Basic

ملخص

توضح هذه المقالة كيفية قراءة سلسلة Unicode من ملف نص Unicode وعرض السلسلة في نموذج Visual Basic.

مزيد من المعلومات

يستند Visual Basic داخليا على معيار Unicode مزدوجة البايت. ومع ذلك، لا يزال معظم العالم خارج Visual Basic يستخدم نموذج ANSI بايت واحد. ولهذا السبب، يوفر Visual Basic اثنين مجموعات من عناصر التحكم بالنماذج ويستخدم ANSI تعيين كعنصر التحكم الافتراضية. تعيين أية سلاسل الذي تم تمريره إلى ANSI نموذج عناصر التحكم ستحول من تمثيل Unicode الداخلية إلى تمثيل ANSI ولن يتم عرض سلاسل UNICODE بشكل صحيح. لتتمكن من عرض سلسلة UNICODE في نموذج Visual Basic، يجب استخدام عناصر تحكم UNICODE (نماذج 2.0). المثال التالي يوضح كيفية استخدام عناصر تحكم النماذج 2.0 لعرض سلاسل UNICODE القراءة من ملف نص Unicode. أن هذا السلوك يتطلب دعم حزمة لغة UNICODE، معتمدة حاليا في نظام التشغيل Windows NT فقط.


ملاحظة: عناصر التحكم 2.0 النماذج المستخدمة في هذه المقالة غير مصممة للاستخدام على نماذج Visual Basic ولم يتم اختبارها رسميا في البيئة. هذه الوثيقة المستندات استخدامها فقط في هذا السياق محدودة جداً للتغلب على قيود لعناصر التحكم المضمنة في Visual Basic. لا يتم اعتماد استخدام الميزات الأخرى لعناصر التحكم هذه في نماذج Visual Basic.

علاوة على ذلك، نماذج 2.0 جزءا من Microsoft Office وغير قابلة للتوزيع. ولذلك، لا يمكنك توزيع النماذج 2.0 (fm20.dll) مع التطبيق الخاص بك. يجب أن يكون الفعل على الأجهزة الهدف.

للحصول على معلومات إضافية حول توزيع fm20.dll، الرجاء مراجعة المقالة التالية في "قاعدة المعارف ل Microsoft":
معلومات 224305 : استخدام وإعادة توزيع FM20. DLL [أوفديف]

دليل خطوة بخطوة لإنشاء نموذج

  1. تثبيت حزمة اللغة الصينية على جهاز الكمبيوتر في نظام التشغيل Windows NT. راجع قسم "المراجع" أدناه للحصول على إرشادات التثبيت. سوف يتم تثبيت الخط مينج لي تلقائياً أثناء هذه الخطوة. يمكنك أيضا تثبيت لغة أخرى تدعم حزم إذا كنت تريد استخدام لغة UNICODE أخرى.
  2. إنشاء مشروع EXE قياسي. يتم إنشاء Form1 افتراضياً.
  3. حدد المكونات من القائمة المشروع وتحقق مكتبة كائنات 2.0 نماذج Microsoft. تتم إضافة عدة عناصر تحكم جديدة إلى مربع الأدوات، بما في ذلك إصدارات UNICODE من مربع النص والتسمية وما إلى ذلك.
  4. إضافة "مربع نص 2.0 النماذج" إلى Form1 والاحتفاظ بالاسم الافتراضي: TextBox1. تعيين خط مربع النص أن مينج لي.
  5. إضافة اثنين CommandButtons إلى Form1.
  6. أضف التعليمات البرمجية التالية إلى إطار التعليمات البرمجية Form1:
          Private Sub Command1_Click()        ' create a Unicode text file with Chinese character
    ' Dan1 and English character D.
    Dim a(0 To 5) As Byte
    a(0) = &HFF
    a(1) = &HFE
    a(2) = &H39
    a(3) = &H4E
    a(4) = &H44
    a(5) = &H0
    Open "unicode.txt" For Binary As #1
    Put #1, , a
    Close #1
    End Sub

    Private Sub Command2_Click()
    Dim txtline As String

    ' you may need to change the path of the file
    Open "unicode.txt" For Binary As #1

    txtline = InputB(2, #1) ' always FF FE, skip them
    txtline = InputB(4, #1)

    Close #1

    TextBox1.Text = txtline ' display the string
    End Sub
    لاحظ أن ملف نص UNICODE دائماً يبدأ ب FE FF بايت، ولهذا السبب تحتاج إلى تخطي هذه وحدتي بايت. لاحظ أيضا أن قراءة سلاسل UNICODE من ملف، يجب أن الملف يتم فتحه كثنائي واستخدام InputB القراءة.
  7. قم بتشغيل التطبيق. انقر فوق Command1 لإنشاء ملف نص Unicode.
  8. انقر فوق الأمر 2. يتم عرض الأحرف الصينية Dan1 والحرف D اللغة الإنجليزية بشكل صحيح في مربع النص. يمكن أن تقوم بإيداع الملف unicode.txt باستخدام "المفكرة" بخط مينج لي أيضا.

المراجع

لمزيد من المعلومات، الرجاء مراجعة المقالات التالية في "قاعدة المعارف ل Microsoft":

177561 كيفية إضافة لغات إضافية وتمكينها في نظام التشغيل Windows NT
معلومات 224305 : استخدام وإعادة توزيع FM20. DLL [أوفديف]
خصائص

رقم الموضوع: 193540 - آخر مراجعة: 21‏/01‏/2017 - المراجعة: 1

تعليقات