Visual Basic formu üzerinde okuma ve görüntü UNICODE dize nasýl

Bu makalede, bir Unicode dizesi, Unicode metin dosyasýndan okunamýyor ve dize bir Visual Basic formunda gösterilmiþtir.

Visual Basic, dahili olarak iki baytlýk Unicode standardýna dayanýr. Ancak, Visual Basic dýþýnda dünyanýn çoðu tek baytlýk ANSI modeli seçseniz. Iki form denetimleri ayarlar ve varsayýlan denetimi olarak ayarlanmýþ ANSI kullanýr, bu nedenle, Visual Basic saðlar. ANSI olarak geçirilen tüm dizeler form denetimleri, kendi iç Unicode gösterimi ANSI gösteriliþinin dönüþtürülür ve UNICODE dizeleri doðru olarak görüntülenmeyecek ayarlayýn. UNICODE dize bir Visual Basic formunda görüntülenecek çalýþtýrabilmesi için <a0></a0>, <a1>UNICODE</a1> (Forms 2.0) denetimleri kullanýlmalýdýr. Aþaðýdaki örnek, Forms 2.0 denetimleri UNICODE dizeleri Unicode metin dosyasýndan okunamýyor görüntülemek için nasýl kullanýlacaðýný gösterir. Bu davranýþý UNICODE dil paketi desteði, þimdilik yalnýzca Windows NT desteklenmeyen gerektirdiðinden.

Not: Bu makalede kullanýlan The Forms 2.0 denetimleri Visual Basic formlarýnda kullanmak için tasarlanmamýþtýr ve resmi ortamýnda sýnanmamýþtýr. Bu makalede, Visual Basic ýntrinsic denetimlere bir sýnýrlamaya geçici çözüm yalnýzca bu baðlamda oldukça sýnýrlý sayýda kullanýmlarý belgelemektedir. Visual Basic formlarýnýn üzerinde bu denetimler diðer özelliklerini kullanarak desteklenmiyor.

Ayrýca, Forms 2.0, Microsoft Office'in bir parçasý olan ve yeniden daðýtýlabilir deðil. Bu nedenle, uygulamanýzla Forms 2.0 (fm20.dll) daðýtýlamýyor. Bu, hedef makinede zaten olmalýdýr.

Lütfen fm20.dll daðýtma ile ilgili ek bilgi için Microsoft Knowledge Base'de aþaðýdaki makaleye bakýn:

Örnek oluþturmak için adým adým kýlavuzu

1. Çince dil paketi, Windows NT bilgisayarýnýza yükleyin. Yükleme yönergeleri için aþaðýdaki BAþVURULAR bölümüne bakýn. Yazý tipi otomatik olarak bu adýmý sýrasýnda yüklenecek MingLiu. Diðer bir UNICODE kullanmak istiyorsanýz, baþka bir dil paketleri de yükleyebilirsiniz dil desteði.
2. Standart bir EXE projesi oluþturun. Varsayýlan olarak, Form1 oluþturulur.
3. Proje menüsünden bileþenleri ' ni seçin ve Microsoft Forms 2.0 Nesne Kitaplýðý. Birkaç yeni denetimler için metin kutusu, etiket vb. UNICODE sürümleri dahil olmak üzere araç, eklenir.
4. Form1'e bir <a0>Form</a0> 2.0 TextBox ekleyin ve varsayýlan adýný tutmak: Metinkutusu1. MingLiu için yazý tipini metin kutusunun ayarlayýn.
5. Iki CommandButtons Form1'e ekleyin.
6. Form1 <a1>Kod</a1> penceresine aþaðýdaki kodu ekleyin:

         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 metin dosyasý her zaman bayt FF neden olan FE ile size baþlayýp Not Bu iki bayt atlanmasý gerekiyor. Ayrýca, UNICODE dizeleri, dosyadan okumak için <a0></a0>, dosya ikili ve InputB kullanarak okundu açýlmasý gerektiðini unutmayýn.
7. Uygulamayý çalýþtýrýn. Command1 <a0>Unicode</a0> metin dosyasý oluþturmak için Ek Yardým düðmesini týklatýn.
8. Command2 Ek Yardým düðmesini týklatýn. Çince karakter Dan1 ve ingilizce karakter D, metin kutusuna doðru görüntülenir. Unicode.txt dosya MingLiu yazý tipi Not Defteri'ni kullanarak da denetleyebilirsiniz.

Ek bilgi için lütfen aþaðýdaki Microsoft Knowledge Base'deki makaleleri bakýn: