В кодировке UTF8 можно читать программно текстовый файл? - VB

Формулировка задачи:

здравствуйте, щас пользуюсь кодом

Sub ReadTextFileLine()
 
Dim a As String
Open ("w:\new 2222.txt") For Input As #1
Do Until EOF(1)
Line Input #1, a
 MsgBox$ a
Loop
Close #1
 
End Sub

пока кракозябры выдаёт месседж в кодировке UTF8, если читать в кодировке ANSI текстовый файл тогда всё ОК, но нужно в кодировке UTF8, как? спасибо

Решение задачи: «В кодировке UTF8 можно читать программно текстовый файл?»

textual
                            Листинг программы 
                        

                            For li = LBound(a) To UBound(a)
        MsgBox$ Len(a(li))
        MsgBox$ li & vbCrLf & a(li)
        Selection.TypeText Text:=a(li)
    Next li

                        

Оцени полезность:

13 голосов , оценка 3.692 из 5

Похожие ответы