Private Sub GetLabwareInfo()
        Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser(AssaySummaryFilepath)
            MyReader.TextFieldType = FileIO.FieldType.Delimited
            MyReader.SetDelimiters(";")
            Dim ReturnText As String = ""
            Dim currentRow As String()
            Dim Counter As Integer = 0
            Dim StrExpression
            While Not MyReader.EndOfData
                Try
                    currentRow = MyReader.ReadFields()
                    If currentRow(0) = "Labware" And currentRow(1) = VBArgWorkorderNo Then
                        'format Labware;4;LW96UGRE;LW96UGRE[001];1
                        StrExpression = "integerarray[" & Counter & "][" & "0" & "][" & "0" & "] := " & currentRow(2)
                        Host.ResolveExpression(StrExpression)
                        StrExpression = "integerarray[" & Counter & "][" & "0" & "][" & "0" & "] := " & currentRow(3)
                        Host.ResolveExpression(StrExpression)
                        StrExpression = "integerarray[" & Counter & "][" & "0" & "][" & "0" & "] := " & currentRow(4)
                        Host.ResolveExpression(StrExpression)
                    End If
                    Counter += 1
                Catch ex As Microsoft.VisualBasic.FileIO.MalformedLineException
                    MsgBox("Line " & ex.Message & "is not valid and will be skipped.")
                End Try
            End While
            'remove trailing semicolumn
            ReturnText = ReturnText.Substring(0, ReturnText.Length - 1)
            'return labware information to fluentcontrol
        End Using
    End Sub