Парсинг текста в файле и вывод результата в файл

у меня в файле 3 SECTION, и каждый Section имеет код. Вот такие:
SECTION: Read flat file [GROUP SECTION] ()
======================================== ===============================
OBJECT: SECTION
EVENT: Initialize Section
-----------------------------------------------------------------------
OPT: Using Defaults
0001 RI szEdiDocumentType = TK EDI - Document Type
0002 // BSM 1677 Enahancements
0003 0004 // 1. Create Cardex for Inventory Transfers

SECTION: LogErrors [GROUP SECTION] ()
======================================== ===============================
OBJECT: SECTION
EVENT: Do Section
-----------------------------------------------------------------------
OPT: Using Defaults
0001 F5649008.Fetch Single
RI szEdiTransactionSet = TK EDI - Transaction Set Number
RI szEdiDocumentType = TK EDI - Document Type
VA rpt_56_EKEY_ErrorMessageKey = TK Error Message Key
VA rpt_56_ERLV_ErrorLevel <- TK Error Level
0002 If SV File_IO_Status is equal to CO SUCCESS

и ищем слово , а когда открываем "OPEN FILE" должен вывести предложение, которое то слово находится.
То есть у меня форма, там (button1)OPEN(кликнем и открывает ту файлу) , textBox1(name of file) . textBox2(write word) - который ищем. FIND(button2)- сюда надо самое главное. потом button3(OPEN FILE)-то есть , когда кликнем надо открывать нов файлу(result.txt) - и там должен SECtION name и предложение.

0