отображение строк, прочитанных из текстового документа не точно - PullRequest
Новая
       2

отображение строк, прочитанных из текстового документа не точно

0 голосов
/ 02 августа 2011 
Sub test()
    Dim TextLine As String
    Open "E:\PROJECTS\CLIENTS\VINCI\MACROS\vn_macro\test.docx" For Input As #1

    Do While Not EOF(1)    ' Loop until end of file.
        Line Input #1, TextLine    ' Read line into variable.
        MsgBox TextLine    ' Print to the Immediate window.
    Loop
    Close #1    ' Close file.
End Sub

внутри того же файла, из которого я читаю, как макрос.

В текстовом документе у меня есть эти простые строки: люблю информатику, каждая из которых разделена новой строкой.

Когда я пытаюсь запустить код, функция msgbox отображает странные строки для каждой из моих простых строк и одну дополнительную.код находит 4 строки вместо 3.

То, что я в основном хочу сделать, это читать текущий открытый документ построчно или 10 строк на 10 строк, если вы можете сэкономить дополнительное время, и вставить точноестрока (и), показанная в документе во временную строку.

1 Ответ

2 голосов
/ 02 августа 2011

Что вам нужно сделать, это использовать Word Automation.Вы не можете получить доступ к файлу как к текстовому файлу, так как Word содержит много метатегов и других форматов.

Посмотрите на Пространство имен классов взаимодействия и , например, .

РЕДАКТИРОВАТЬ: Извините, это для .NET.Также есть Word Automation для VB6, я помню, что делал такие вещи в свое время.Вам нужно будет добавить ссылку для этого.

НОВОЕ РЕДАКТИРОВАНИЕ: На самом деле я нашел довольно хороший сайт для Word Automation с VB6. Нажмите на эту ссылку .Кроме того, вы также можете найти этот полезным.

...