Чтение текста из документа(выбрать строку, текст) - VB

Формулировка задачи:

Подскажите как сделать что бы программа читала определенную строку в тексте и только цифры. Например дано: 1900 #Date А мне нужно: 1900 После чего заменить число 1900 на 1800, и сохранить в этот же документ, что бы получилось так: 1800 #Date Вот я составил код, но он читает только первую строку и весь текст... Private Sub Command1_Click() Dim mo As Integer Dim s As String Open "C:\12345.txt" For Input As #1 Line Input #1, s MsgBox s Close #1 End Sub Помогите составить программу, наверняка кому то уже известно как это делать... (К примеру редакторы для игр, нужно только открыть файл и в текстовых полях изменить нужные числа) Заранее спасибо!

Решение задачи: «Чтение текста из документа(выбрать строку, текст)»

textual
                            Листинг программы 
                        

                               Dim File As String, CF As String 
   'объявим пеpеменнyю для имени файла и его cодеpжимого 
   File = "d:\ca.log" 
   'ycтановим имя файла и пyть 
   Open File For Binary As #1 
   'откpоем файл для чтения 
      CF = Input(FileLen(File), 1)   'загpyзить в пеpеменyю CF вcе cодеpжимое файла 
   Close #1 
   'закpыть файл
                        