Удаление невидимых символов

[Lotreck]

Как удалить невидимые символы, табуляции, интер, чтобы они не отображались в TextBox.

[onell]

backspace или delete

[Lotreck]

Имелось ввиду программно.
Что значит backspace или delete если они в Блокноте невидимы и вылезают только в TextBox.

[alibek]

Lotreck, ты о каких-то своих фантазиях рассказываешь.
TextBox и Блокнот — это фактически одно и то же.

[Lotreck]

Существует текстовый файл состоющий из структур заданной длины.
При выводе в TextBox после последней записи, если количество символов меньше заданной длины, остаются эти самые символы в виде вертикальных полосок. Как их удалить?
Про наборе текста в блокноте они не отображаются.

[Viper]

Lotreck, еще раз об том, как и откуда берутся у тебя эти символы в текстоовом поле.

[Lotreck]

На форме TextBox и две кнопки

Private Type Struktura
pole_1 As String * 30
End Type
Dim Spisok As Struktura
Dim N As Long

Private Sub Command1_Click() ' заполнение
Open "c:\File.txt" For Random As #1 Len = Len(Spisok)
N = LOF(1) / Len(Spisok)
N = N + 1
Spisok.pole_1 = Text1.Text & vbCrLf
Put #1, N, Spisok
Close #1
Text1.Text = ""
Text1.SetFocus
' заполните несколько строк
End Sub

Private Sub Command2_Click() ' считывание
Open "c:\File.txt" For Random As #1 Len = Len(Spisok)
Get #1, 1, Spisok
Text1.Text = Spisok.pole_1
Close #1
End Sub

Private Sub Form_Load()
Text1.Text = ""
End Sub

[Amed]

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

Text1.Text = Replace(Text1.Text, vbTab, vbNullString)

[Lotreck]

В какое место кода вставлять фрагмент?

Get #1, 1, Spisok
Text1.Text = Spisok.pole_1
Text1.Text = Replace(Text1.Text, vbTab, vbNullString)
не дал никаких изменений

[Amed]

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

Чтобы убрать переводы строк, надо добавить еще одну такую строку, но с vbCrLf.

Кстати, лучше писать

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

Get #1, 1, Spisok
Text1.Text = Replace(Spisok.pole_1, vbTab, vbNullString)
Text1.Text = Replace(Text1.Text, vbCrLf, vbNullString)

[Lotreck]

Спасибо за помощь. Все сработало.