Public Function GetBarCodeData(recordID As Integer) As List(Of BarcodeData)
Dim FieldX As BarcodeData = New BarcodeData()
Dim returnValue As List(Of BarcodeData) = New List(Of BarcodeData)
For Each bc As String In FieldX
Next
FieldX.FieldName()
FieldX.Active1()
FieldX.FontTypeName()
FieldX.FontSize()
FieldX.BoldA()
FieldX.Top1()
FieldX.left1()
FieldX.widthS()
FieldX.Height1()
FieldX.Default1()
returnValue.Add(FieldX)
Next
Return returnValue
End Function
End Class
Help me please