Код не работает!!

[nikemike]

Че в нем не так?

Код: Выделить всё

Open "out/tara.uvmdat" For Input As #1
Do Until EOF(1)
Line Input #1, txt
txtTara = alltxt + txt + vbCrLf
Loop
Close #1
lblTara.Caption = txtTara & " %"

[Sebas]

если это опрос, то где варианты ответов?

[nikemike]

Хорошо не работает эта строка

Код: Выделить всё

lblTara.Caption = txtTara & " %"

[Twister]

Поясняю слова Sebas:
Что должно получиться и что не получается?

1.

Код: Выделить всё

"out/tara.uvmdat"

- это путь к файлу? Если да, то слешь ставится в другую сторону: \
2. Советую делать не так:

Код: Выделить всё

Open "some_path" For Input As #1
Do Until EOF(1)
Line Input #1, txt
Loop
Close #1

а вот так:

Код: Выделить всё

dim ff as integer

ff=freefile
Open "some_path" For Input As #ff
Do Until EOF(ff)
Line Input #ff, txt
Loop
Close #ff

[nikemike]

да нет это все нормально работает а вот не могу добавить

Код: Выделить всё

& " %"

вот именно по этому код не пашет!?

[nikemike]

как мне добавить идеентичную функцию?

[Sebas]

ну нет у нас телепатов, как ты не понимаешь!

Текст ошибки?

[SHURUP]

Оно ошибку выдает или не то выводит, что в файле ?

А что в tara.uvmdat хранится? Если двоичные данные (в смысле непечатаеммые символы) то они могут некоректно отображаться в контроллах...

[nikemike]

В файле нах. текст

[nikemike]

Sebas, прости прога пишет Run-time error '424' Object required

[Sirik]

попробуй вот этот код:

Код: Выделить всё

    Dim txt As String, txtTara As String
    Open "out\tara.uvmdat" For Input As #1
    Do Until EOF(1)
        Line Input #1, txt
        txtTara = txtTara & txt & vbCrLf
        Loop
    Close #1
    MsgBox txtTara & " %"


А ошибка от того, что переменнная txtTara не объявленна

[nikemike]

все вроде работает но к txtTara не добавляется "%"!

[Viper]

Очень может быть, что весь текст txtTara просто не умещается в лэйбл поскольку в txtTara судя по коду является многострочным кодом. Потому то ты и не видишь завершаюший "%"

[nikemike]

!Viper!, молодец, что так думаешь я сам с этим немного раньше разобрался, но всеже спасибо!

[val]

nikemike

обрати внимание на то как ты "обзываешь" переменные.
Большинство читающих твой пост наверняка думали что txtTara есть
text box