VB: код для отображения txt файла

[Dima1110]

вот:
на начало можете внимания не обращать я его отсюда вырезал
Wrap$ = Chr$(13) + Chr$(10)
CommonDialog1.Filter = "txt-doc(*.txt)|*.txt"
CommonDialog1.ShowOpen
If CommonDialog1.FileName <> "" Then
Form1.MousePointer = 11
End If
Open CommonDialog1.FileName For Input As #1
Do Until EOF(1)
Line Input #1, LineOfText$
AllText$ = AllText$ & LineOfText$ & Wrap$
Loop
LblFile.Caption = Common.Dialog1.FileName
txtFile.Text = AllText$
txtFile.Enabled = True
mnuItemClose.Enabled = True
mnuItemOpen.Enabled = False
у меня пишет ошибку 424 кокой-то обьект ему нужен
чё дальше?

[EducatedFool]

у меня пишет ошибку 424 кокой-то обьект ему нужен
чё дальше?

Дальше смотрим, какая строка выделяется желтым, когда код вылетает с ошибкой.
Потом уже думаем, ссылка на какой объект имеется в этой строке кода.

PS: Считать текст из текстового файла можно так: http://excelvba.ru/code/txt

[Dima1110]

Что такого в этой строке?
txtFile.Text = AllText = ""
и ещё
Print #1, txtNote.txt
я просто новичок и многого не знаю