'Saves the table to a CSV file.
Public Sub SaveTableToCSV(Dir As String, Filename As String)
Dim headers(NumberOfColumns) As String
For i = 0 To headers.Length - 1
Dim L As Label
L = Header.GetView(i)
headers(i) = L.Text
Next
StringUtils1.SaveCSV2(Dir, Filename, ",", Data, headers)
End Sub