Страница: 1 | 
		
		 
			   
			 
			 
			 
			 Страница: 1 | 
 
			
 
  
		
     
  
    
Вопрос: Чтение файла (вопрос для профессионалов)
     
    
Добавлено: 08.03.06 15:49
     
      
  
				
			  
					 
			
				 
    
		
       
    
Автор вопроса:  
    
 psinetron | ICQ: 218945948 
      
       
  
'Поздравляю всех девушек с 8 марта!
 
    
Я перевожу программу из Delphi в VB, и вот у меня маленькая такая проблемка. Я застрял на таком вот месте:
Есть ли подобные функции в VB? Да и вообще - объясните толком - как эта функция работает. Я пробовал создавать файл C:\input.txt в котором было примерно следующее:
Строка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 "
:\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 Рановато тебе еще тут модерить  
    
ЗЫ Никого обидеть не хотел, но уж больно эта формулировка понравилась