我读入文本文件中的数据,字母,数字,及其他符号都正常,只有中文为乱码。
    Dim DataChunk As String
  Open Fname$ For Binary As #1
       
        Do While Not EOF(1)
          ' update the Pass Variable
          passes& = passes& + 1
          ' get some of the file data
          DataChunk$ = Input(MAX_CHUNK, #1)
          FrmServer.Text1.Text = FrmServer.Text1.Text + DataChunk
一次取MAX_CHUNK,在Text里面显示中文为乱码。为何?