Visual Basic 6 и UTF-8

Question

В настоящее время у меня есть древняя процедура VB6, которая открывает текстовый файл следующим образом

Public Function ApriFile(sFile As String, iCanale As Integer) As Boolean
  On Error GoTo ApriFileErr
  ApriFile = False
  NumberError = 0
  sErrore = ""

  Close #iCanale

  'Apertura archivio di input
  Open sFile For Input As #iCanale

  ApriFile = True
  Exit Function

ApriFileErr:
  ApriFile = False
  'Errore nell'apertura del file
  If Err.Number <> 0 Then
    NumberError = Err.Number
    sErrore = Err.Description
  End If

End Function

Как можно использовать кодировку UTF8?

Мне нужно открыть файл, прочитать построчно, используя кодировку UTF-8, а затем записать в другой файл всегда с той же кодировкой.