.NET 4.x Разбор (парсинг) текстового файла - Visual Basic .NET

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

Добрый день. помогите разобрать текстовик следующего содержания [---HEADER---] [RELEASE#]=102[OWNER@]=TRAIO [---ITEM_ARRAY---] [REC#]=1[BOX#]=1[ORDER@]=1 [ITEM#]=1[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=649.000[HEIGHT#.]=1242.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/19 [REC#]=2[BOX#]=2[ORDER@]=1 [ITEM#]=2[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=579.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/21 [REC#]=3[BOX#]=3[ORDER@]=1 [ITEM#]=3[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=574.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/23 коротко о структуре

полный файл

Спойлер

[---HEADER---] [RELEASE#]=102[OWNER@]=TRAIO [---ITEM_ARRAY---] [REC#]=1[BOX#]=1[ORDER@]=1 [ITEM#]=1[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=649.000[HEIGHT#.]=1242.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/19 [REC#]=2[BOX#]=2[ORDER@]=1 [ITEM#]=2[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=579.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/21 [REC#]=3[BOX#]=3[ORDER@]=1 [ITEM#]=3[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=574.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/23 [REC#]=4[BOX#]=4[ORDER@]=1 [ITEM#]=4[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=574.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/25 [REC#]=5[BOX#]=5[ORDER@]=1 [ITEM#]=5[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=574.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/27 [REC#]=6[BOX#]=6[ORDER@]=1 [ITEM#]=6[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=574.000[HEIGHT#.]=1322.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/29 [REC#]=7[BOX#]=7[ORDER@]=1 [ITEM#]=7[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=551.000[HEIGHT#.]=1144.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/31 [REC#]=8[BOX#]=8[ORDER@]=1 [ITEM#]=8[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=481.000[HEIGHT#.]=1224.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/33 [REC#]=9[BOX#]=9[ORDER@]=1 [ITEM#]=9[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=454.000[HEIGHT#.]=1242.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/35 [REC#]=10[BOX#]=10[ORDER@]=1 [ITEM#]=10[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=454.000[HEIGHT#.]=1242.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/37 [REC#]=11[BOX#]=11[ORDER@]=1 [ITEM#]=11[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=309.000[HEIGHT#.]=1262.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/43 [REC#]=12[BOX#]=12[ORDER@]=1 [ITEM#]=12[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=309.000[HEIGHT#.]=1262.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/45 [REC#]=13[BOX#]=13[ORDER@]=1 [ITEM#]=13[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=309.000[HEIGHT#.]=1262.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/47 [REC#]=14[BOX#]=14[ORDER@]=1 [ITEM#]=14[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=309.000[HEIGHT#.]=1262.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/49 [REC#]=15[BOX#]=15[ORDER@]=1 [ITEM#]=15[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=309.000[HEIGHT#.]=1262.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/51 [REC#]=16[BOX#]=16[ORDER@]=1 [ITEM#]=16[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=309.000[HEIGHT#.]=1262.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=01/53 [REC#]=17[BOX#]=17[ORDER@]=1 [ITEM#]=17[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=546.000[HEIGHT#.]=1401.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/31 [REC#]=18[BOX#]=18[ORDER@]=1 [ITEM#]=18[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=536.000[HEIGHT#.]=1451.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/33 [REC#]=19[BOX#]=19[ORDER@]=1 [ITEM#]=19[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=522.000[HEIGHT#.]=1401.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/35 [REC#]=20[BOX#]=20[ORDER@]=1 [ITEM#]=20[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=521.000[HEIGHT#.]=1401.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/37 [REC#]=21[BOX#]=21[ORDER@]=1 [ITEM#]=21[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=511.000[HEIGHT#.]=1451.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/39 [REC#]=22[BOX#]=22[ORDER@]=1 [ITEM#]=22[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=492.000[HEIGHT#.]=1451.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/41 [REC#]=23[BOX#]=23[ORDER@]=1 [ITEM#]=23[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=491.000[HEIGHT#.]=1451.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/43 [REC#]=24[BOX#]=24[ORDER@]=1 [ITEM#]=24[OPT_GROUP#]=99[CODE@]=4MM L [WIDTH#.]=457.000[HEIGHT#.]=836.000[UNIT_QTY#]=1[SHEET_QTY#]=1[*RACK@]=03/53 [---GLASS_ARRAY---] [REC#]=1[CODE@]=4MM L[DESCRIPTION@]=4MM L[RACK@]=A1[WIDTH#.]=6000.000 [HEIGHT#.]=3210.000[QTY#]=770[BOTTOM_TRIM#.]=15.000[RIGHT_TRIM#.]=15.000 [TOP_TRIM#.]=15.000[LEFT_TRIM#.]=15.000[MIN_BREAK_DIST#.]=15.000 [---OPT_PARAMETER---] [OPT_TIME#]=60[OPT_%TARGET#]=0[MIN_SUBPL_WIDTH#.]=0.000 [MAX_SUBPL_WIDTH#.]=6000.000[MIN_BREAK_DIST#.]=15.000 [---OPT_RESULT_HEADER---] [USED_STRATEGY#]=1[USED_OPT_PARA@]= 8 132 1[OPT_AREA_NET#]=14847 [OPT_AREA_GROSS#]=16423[OPT_WASTE%#]=848[REMNANT_WIDTH#.]=884.000 [REMNANT_HEIGHT#.]=3210.000[STOCK_SHEET_QTY#]=1[STOCK_SHEET_TYPE_QTY#]=1 [X_AREA_TYPE_QTY#]=5 [---OPT_RESULT_STOCK_SHEET_ARRAY---] [STOCK_SHEET#]=1[GLASS_REF#]=1[REMNANT_WIDTH#.]=884.000[X_AREA_QTY#]=5 [X_AREA_TYPE_QTY#]=5 [*X_AREA_REF#]=1 [*X_AREA_REF#]=2 [*X_AREA_REF#]=3 [*X_AREA_REF#]=4 [*X_AREA_REF#]=5 [---OPT_RESULT_X_AREA_ARRAY---] [X_AREA#]=1[WIDTH#.]=1451.000[HEIGHT#.]=3127.000[Y_AREA_QTY#]=6 [Y_AREA_TYPE_QTY#]=6 [*Y_AREA_REF#]=1 [*Y_AREA_REF#]=2 [*Y_AREA_REF#]=3 [*Y_AREA_REF#]=4 [*Y_AREA_REF#]=5 [*Y_AREA_REF#]=6 [X_AREA#]=2[WIDTH#.]=1322.000[HEIGHT#.]=3161.000[Y_AREA_QTY#]=6 [Y_AREA_TYPE_QTY#]=6 [*Y_AREA_REF#]=7 [*Y_AREA_REF#]=8 [*Y_AREA_REF#]=9 [*Y_AREA_REF#]=10 [*Y_AREA_REF#]=11 [*Y_AREA_REF#]=12 [X_AREA#]=3[WIDTH#.]=1262.000[HEIGHT#.]=3129.000[Y_AREA_QTY#]=8 [Y_AREA_TYPE_QTY#]=8 [*Y_AREA_REF#]=13 [*Y_AREA_REF#]=14 [*Y_AREA_REF#]=15 [*Y_AREA_REF#]=16 [*Y_AREA_REF#]=17 [*Y_AREA_REF#]=18 [*Y_AREA_REF#]=19 [*Y_AREA_REF#]=20 [X_AREA#]=4[WIDTH#.]=574.000[HEIGHT#.]=2158.000[Y_AREA_QTY#]=2 [Y_AREA_TYPE_QTY#]=2 [*Y_AREA_REF#]=21 [*Y_AREA_REF#]=22 [X_AREA#]=5[WIDTH#.]=492.000[HEIGHT#.]=2693.000[Y_AREA_QTY#]=2 [Y_AREA_TYPE_QTY#]=2 [*Y_AREA_REF#]=23 [*Y_AREA_REF#]=24 [---OPT_RESULT_Y_AREA_ARRAY---] [Y_AREA#]=1[WIDTH#.]=1451.000[HEIGHT#.]=536.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=18[*U/V/W/Z_AREA_WIDTH#.]=1451.000 [*U/V/W/Z_AREA_HEIGHT#.]=536.000 [Y_AREA#]=2[WIDTH#.]=1451.000[HEIGHT#.]=511.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=21[*U/V/W/Z_AREA_WIDTH#.]=1451.000 [*U/V/W/Z_AREA_HEIGHT#.]=511.000 [Y_AREA#]=3[WIDTH#.]=1451.000[HEIGHT#.]=491.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=23[*U/V/W/Z_AREA_WIDTH#.]=1451.000 [*U/V/W/Z_AREA_HEIGHT#.]=491.000 [Y_AREA#]=4[WIDTH#.]=1401.000[HEIGHT#.]=546.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=17[*U/V/W/Z_AREA_WIDTH#.]=1401.000 [*U/V/W/Z_AREA_HEIGHT#.]=546.000 [Y_AREA#]=5[WIDTH#.]=1401.000[HEIGHT#.]=522.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=19[*U/V/W/Z_AREA_WIDTH#.]=1401.000 [*U/V/W/Z_AREA_HEIGHT#.]=522.000 [Y_AREA#]=6[WIDTH#.]=1401.000[HEIGHT#.]=521.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=20[*U/V/W/Z_AREA_WIDTH#.]=1401.000 [*U/V/W/Z_AREA_HEIGHT#.]=521.000 [Y_AREA#]=7[WIDTH#.]=1322.000[HEIGHT#.]=579.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=2[*U/V/W/Z_AREA_WIDTH#.]=1322.000 [*U/V/W/Z_AREA_HEIGHT#.]=579.000 [Y_AREA#]=8[WIDTH#.]=1322.000[HEIGHT#.]=574.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=4[*U/V/W/Z_AREA_WIDTH#.]=1322.000 [*U/V/W/Z_AREA_HEIGHT#.]=574.000 [Y_AREA#]=9[WIDTH#.]=1322.000[HEIGHT#.]=574.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=6[*U/V/W/Z_AREA_WIDTH#.]=1322.000 [*U/V/W/Z_AREA_HEIGHT#.]=574.000 [Y_AREA#]=10[WIDTH#.]=1322.000[HEIGHT#.]=574.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=3[*U/V/W/Z_AREA_WIDTH#.]=1322.000 [*U/V/W/Z_AREA_HEIGHT#.]=574.000 [Y_AREA#]=11[WIDTH#.]=1262.000[HEIGHT#.]=309.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=12[*U/V/W/Z_AREA_WIDTH#.]=1262.000 [*U/V/W/Z_AREA_HEIGHT#.]=309.000 [Y_AREA#]=12[WIDTH#.]=1144.000[HEIGHT#.]=551.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=7[*U/V/W/Z_AREA_WIDTH#.]=1144.000 [*U/V/W/Z_AREA_HEIGHT#.]=551.000 [Y_AREA#]=13[WIDTH#.]=1262.000[HEIGHT#.]=309.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=11[*U/V/W/Z_AREA_WIDTH#.]=1262.000 [*U/V/W/Z_AREA_HEIGHT#.]=309.000 [Y_AREA#]=14[WIDTH#.]=1262.000[HEIGHT#.]=309.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=13[*U/V/W/Z_AREA_WIDTH#.]=1262.000 [*U/V/W/Z_AREA_HEIGHT#.]=309.000 [Y_AREA#]=15[WIDTH#.]=1262.000[HEIGHT#.]=309.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=16[*U/V/W/Z_AREA_WIDTH#.]=1262.000 [*U/V/W/Z_AREA_HEIGHT#.]=309.000 [Y_AREA#]=16[WIDTH#.]=1262.000[HEIGHT#.]=309.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=14[*U/V/W/Z_AREA_WIDTH#.]=1262.000 [*U/V/W/Z_AREA_HEIGHT#.]=309.000 [Y_AREA#]=17[WIDTH#.]=1262.000[HEIGHT#.]=309.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=15[*U/V/W/Z_AREA_WIDTH#.]=1262.000 [*U/V/W/Z_AREA_HEIGHT#.]=309.000 [Y_AREA#]=18[WIDTH#.]=1242.000[HEIGHT#.]=649.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=1[*U/V/W/Z_AREA_WIDTH#.]=1242.000 [*U/V/W/Z_AREA_HEIGHT#.]=649.000 [Y_AREA#]=19[WIDTH#.]=1242.000[HEIGHT#.]=454.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=9[*U/V/W/Z_AREA_WIDTH#.]=1242.000 [*U/V/W/Z_AREA_HEIGHT#.]=454.000 [Y_AREA#]=20[WIDTH#.]=1224.000[HEIGHT#.]=481.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=8[*U/V/W/Z_AREA_WIDTH#.]=1224.000 [*U/V/W/Z_AREA_HEIGHT#.]=481.000 [Y_AREA#]=21[WIDTH#.]=574.000[HEIGHT#.]=1322.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=5[*U/V/W/Z_AREA_WIDTH#.]=574.000 [*U/V/W/Z_AREA_HEIGHT#.]=1322.000 [Y_AREA#]=22[WIDTH#.]=457.000[HEIGHT#.]=836.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=24[*U/V/W/Z_AREA_WIDTH#.]=457.000 [*U/V/W/Z_AREA_HEIGHT#.]=836.000 [Y_AREA#]=23[WIDTH#.]=492.000[HEIGHT#.]=1451.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=22[*U/V/W/Z_AREA_WIDTH#.]=492.000 [*U/V/W/Z_AREA_HEIGHT#.]=1451.000 [Y_AREA#]=24[WIDTH#.]=454.000[HEIGHT#.]=1242.000[U/V/W/Z_AREA_TYPE_QTY#]=1 [*U/V/W/Z_AREA_ITEM_REF#]=10[*U/V/W/Z_AREA_WIDTH#.]=454.000 [*U/V/W/Z_AREA_HEIGHT#.]=1242.000

в общем структура похожа на XML, только есть родительский тег обрамленный "[---" и "---]" , и обычные теги в квадратных скобках с параметром или без данный файл я загнал в массив строк с помощью

Dim split As String() = optlines.Split("[")

где в каждой ячейке один тег(либо заголовок, либо обычный) необходимо разобрать и запихнуть данный текст в структуру или набор массивов, так как в разных блоках есть наборы данных связанные между собой

Решение задачи: «.NET 4.x Разбор (парсинг) текстового файла»

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

                                Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName As String) As Integer
 
Private Sub  Getit()
  Dim rc As String = Strings.StrDup(255, vbNullChar)
  GetPrivateProfileString("[---ITEM_ARRAY---]", "[REC#]", "", rc, 255,  "C:\yourfile.xxx")
End Sub
                        