What is wrong with this code ?

Hi there, VB.NET

I need to write to a text file the values, instead it writes the string

FileOpen(1, "d:\orders\orders.txt", OpenMode.Output)

If LCase(Trim(MyArray(J, 45))) = "yes" Then
OutLine = "TAB(2)," & " Trim(MyArray(J, 38)), "
End If

If LCase(Trim(MyArray(J, 37))) = "new" Then
OutLine = OutLine & " TAB(51), " & " NONE "
Else
OutLine = OutLine & "TAB(51)," & " Trim(MyArray(J, 25)), "
End If

PrintLine(1, OutLine)

orders.txt TAB(2), Trim(MyArray(J, 38)), TAB(51), NONE

Try This

VB Code:

If LCase(Trim(MyArray(J, 45))) = "yes" Then 
OutLine = TAB(2) & "," &  Trim(MyArray(J, 38)) & ", "
End If
 
If LCase(Trim(MyArray(J, 37))) = "new" Then
OutLine = OutLine & TAB(51) & ", " & " NONE "
Else
OutLine = OutLine & TAB(51) & "," &  Trim(MyArray(J, 25)) & ", " 
End If

the problem lies here
"TAB(2)," & " Trim(MyArray(J, 38)), "

it should be like TAB(2) & "," & Trim(MyArray(J, 38)) & ","

Well my guess is that the TAB(2) function is only recognized within the Print or PrintLine functions. It probably may be a work around this, but I have not figure it out yet.