Visual Basic ??????? ?? ??? ?? ???????? ??????? ???????? ???? ????

?? ???? ????????? ???? ?? ?? ?? ??????? ???????? ?? ?? ??????? ??? ????? ?? ????? ?? ???????? ?? ??? Visual Basic ?? ??? ??? ????????? ???? ?? ??? ???? ?????

Visual Basic ?? ?????? ?? internally ???-???? ??????? ????? ???????, Visual Basic ?? ???? ????? ?? ???????? ??? ?? ????? ?????-???? ANSI ????? ?? ???? ?? ??? Visual Basic ?? ??????? ?????????? ?? ??? ???? ?? ?? ?????? ????? ?? ANSI ???????? ??????? ?? ??? ??? ??? ?? ????? ???? ??? ??????? ???????? ???? ANSI ?? ???????????? ???? ?? ??? ???? ?????? ??????? ????????? ?? ?????? ???? ????? ?? ??? ???? ?? ????????? ? ??????? ?????????? ?? ???? ?? ?????????? ?? ANSI ???? ??? ????? ??????? ???????? ?? ??? Visual Basic ?? ??? ??? ????????? ???? ??? ????? ??, ?? ??? ??????? (??????? 2.0) ???????? ????? ???? ?? ???? ???? ????? ????? ?????? ??????? ?????????? ?? ?? ??????? ??? ????? ?? ????? ??? ????????? ???? ?? ??? ??????? 2.0 ?????????? ?? ????? ???? ?? ??? ???? ?????? ??? ??????? ?? ??????? ??????? ???? ?????? ??????, ?? ???? Windows NT ??? ??????? ??? ??????? ?? ???????? ???

???:: ?? ???? ??? ???????? 2.0 ??????? ???????? Visual Basic ????????? ?? ????? ?? ??? ??????? ???? ??? ?? ?? ?? ?? ??? ???? ???? ??? formally ??????? ??????? ??? ??? ?? ???? ??? ??? ???? ?? ??? Visual Basic Intrinsic ?????????? ?? ?? ???? ?? ??? ?? ???? ????? ?????? ??? ???? ???? ????? ?????????? ?? ?????????? ?? Visual Basic ????????? ?? ???? ???????? ?? ????? ???? ??????? ???? ???

Furthermore, ??????? 2.0 Microsoft Office ?? ??? ?? ?? redistributable ???? ??? ?????, ?? ???? ????????? ?? ??? ??????? 2.0 (fm20.dll) ?????? ???? ?? ???? ???? ?? ?????? ???? ?? ???? ?? ?? ???? ??????

Distributing fm20.dll ?? ???????? ??????? ?? ??? ????? ????? ???? ?? Microsoft ???????? ??? ?????:

????? ????? ???? ?? ??? step-by-Step ????????????

1. ???? ???? ?????? ?? ???? Windows NT ???????? ?? ??????? ????? ??????? ????????? ?? ??? ???? ?????? ??? ?? ?????? ????? ??????? ???? ????? ???????? ??? ?? ?? ??? ?? ????? MingLiu. ?? ?? ??????? ?? ???? ???? ???? ?????? ??? ?? ???? ??????? ?? ????? ???? ????? ??? ?? ???? ???????
2. ???? ???? EXE ????????? ?????? Form1 ???????? ??? ?? ???? ??..
3. ??? ?????????????????????? ?? ???Microsoft ??????? 2.0 ???????? ?????????. ??????? ??? ?????, ????, ?? ??? forth ?? ????????? ????, ????? ???? ?? ??? ?? ?? ???????? ????? ???? ????
4. Form1 ?? ?? ??????? 2.0 ??? ????? ?????? ?? ???? ???????? ??? ????: TextBox1. ??? ????? ?? ????? MingLiu ???? ?? ??? ??? ?????
5. ?? ??????CommandButtonsForm1 ???? ?? ????
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

   ????? ??? ?? ??????? ??? ????? ????? ?? ???? ???? ???? FF FE, ?? ?? ?? ?? ?????? ????? ?? ??? ???? ????? ???? ??? ?? ??? ???? ?? ???? ????? ?? ??????? ?????????? ?? ???? ?? ??? ????? ???? ?? ???????? ?????? ?? ????? ?? ??? InputB ?? ????? ???? ??? ?? ??? ??? ???? ?? ???? ???
7. ????????? ?????? ????? ????,Command1??????? ??? ????? ??????
8. ????? ????,Command2. ???? ???? Dan1 ?? ???????? ????? D ????????? ???? ??? ??? ?? ??? ????? ???? ?? unicode.txt ????? MingLiu ????? ?? ??? ?????? ?? ????? ?? ???? ?? ?? ???? ????

???????? ??????? ?? ???, ????? ????? ?????? ?? Microsoft ???????? ??? ?????: