[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Форум » Наш сайт » Visual basic » Загрузить/сохранить текстовый файл в TextBox (Загрузить/сохранить текстовый файл в TextBox)
Загрузить/сохранить текстовый файл в TextBox
ilimДата: Среда, 09.11.2011, 22:23 | Сообщение # 1
Генералиссимус
Группа: Администраторы
Сообщений: 680
Награды: 17
Репутация: 4
Статус: Offline
'Загрузить текстовой файл в TextBox

Dim FN As Integer
Dim FName As String

FN = FreeFile
FName = "C:\tmp\index.txt"
Open FName For Input As #FN
Text1.Text = Input(LOF(FN), #FN)
Close #FN

'Сохранить текстовой файл из TextBox'а

Dim FN As Integer
Dim FName As String

FN = FreeFile
FName = "C:\tmp\index.txt"
Open FName For Output As #FN
Print #FN, Text1.Text
Close #FN


www.ilim.kz
 
Форум » Наш сайт » Visual basic » Загрузить/сохранить текстовый файл в TextBox (Загрузить/сохранить текстовый файл в TextBox)
Страница 1 из 11
Поиск: