>>644
VB6で使われているUnicodeは、UCS-2です。
UTF-16ならばそのまま読めますが、UTF-8だと変換が必要かと。

で、文字コードの変換という事であれば、ADODB.Streamオブジェクトが
利用できます。(Charsetプロパティで任意の文字コードを指定できます)

Private Sub Form_Load()
　　With CreateObject("ADODB.Stream")
　　　　.Charset = "UTF-8"
　　　　.Open
　　　　.LoadFromFile "C:\UTF8.TXT"
　　　　Label1.Caption = .ReadText()
　　　　.Close
　　End With
End Sub