Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Чтение файла (вопрос для профессионалов) Добавлено: 08.03.06 15:49  

Автор вопроса:  psinetron | ICQ: 218945948 
'Поздравляю всех девушек с 8 марта!

Я перевожу программу из Delphi в VB, и вот у меня маленькая такая проблемка. Я застрял на таком вот месте:
BlockRead(f, Buf, 4);

Есть ли подобные функции в VB? Да и вообще - объясните толком - как эта функция работает. Я пробовал создавать файл C:\input.txt в котором было примерно следующее:

Строка1
Строка2
Строка3


 и т.д.
После выполнения функции в переменную buf записывается какое-то длинное число. Что это за число я так и не понял.
Пробовал искать описания функции - все как-то непонятно, но я пришел к выводу, что это функция чтения файла отрывками. В VB кажется такого нету, может тогда кто-нибудь поможет мне подобную функцию самому написать?

Ответить

  Ответы Всего ответов: 7  

Номер ответа: 1
Автор ответа:
 GSerg



Вопросов: 0
Ответов: 1876


 Профиль | | #1 Добавлено: 08.03.06 17:04
"Я использовал функцию, назначение которой не знаю, и которая возвращает неизвестно что. Как мне написать такую же функцию на VB?"

Ответить

Номер ответа: 2
Автор ответа:
 SL



ICQ: 277007669 

Вопросов: 10
Ответов: 86
 Профиль | | #2 Добавлено: 08.03.06 17:13
для текстового файла:
open "C:\Input.txt" for Parametr as #Num 'где Num - номер свободного файла (можно получить FreeFile); где parametr - одно из следующего: output (стирает всё в файле и пишет в него); input (читает из файла); append (открывает файл для записи в него(не стирая))
input #1, t ' t-текстовая переменная

вместо input может быть:
input - чтение из файла до запятой или до конца строки
line input - чтение до конца строки
print - пишет содержимое переменной в файл, а потом enter
write - пишет содержимое переменно в кавычках, а потом enter

потом
close #Num

Ответить

Номер ответа: 3
Автор ответа:
 SL



ICQ: 277007669 

Вопросов: 10
Ответов: 86
 Профиль | | #3 Добавлено: 08.03.06 17:19
если бинарник, то

Dim a As String
Open ";D:\1.txt" For Binary As #1
a = Space(10) 'в скобках, скока ты хочешь читать знаков
Get #1, Pos, a 'Pos - с какой позиции читать
a = "привет"
Put #1, pos, a 'pos - с какой позиции писать
Close #1

put заменяет текст, если файл не пустой, т.е. если был
'-----
привет, как дела
'-----
a="123"
после put #1,a,3
'-----
при123, как дела
'-----

Ответить

Номер ответа: 4
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #4 Добавлено: 09.03.06 11:15

вопрос для профессионалов

Аффтар жжот нипадецки. 5 баллов!
Кисакуку! Ты с какова горада?

Ответить

Номер ответа: 5
Автор ответа:
 Sacred Phoenix



ICQ: 304238252 

Вопросов: 52
Ответов: 927
 Профиль | | #5 Добавлено: 09.03.06 20:43
2 LOL: тебя что-то затронуло??? Еще раз говорю - проявляй уважение к посетителям форума!!!

Ответить

Номер ответа: 6
Автор ответа:
 Fever



Вопросов: 60
Ответов: 808
 Профиль | | #6 Добавлено: 09.03.06 22:01
Ша

Ответить

Номер ответа: 7
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #7 Добавлено: 13.03.06 10:07
2Sacred Phoenix Рановато тебе еще тут модерить ;)
ЗЫ Никого обидеть не хотел, но уж больно эта формулировка понравилась :)

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам