B4J Question [B4XTable] How To Sort Multiple Columns

Private Sub tbl_TableOfAssets_HeaderClicked (ColumnId As String)
    Dim col As B4XTableColumn = tbl_TableOfAssets.GetColumn(ColumnId)
    'if not clicked c0...
    Dim sql As String = $"SELECT * FROM data ORDER BY ${col.SQLID}, c0"$
    tbl_TableOfAssets.sql1.ExecNonQuery(sql)
End Sub

Sub B4XTable1_HeaderClicked (ColumnId As String)
    Dim col As B4XTableColumn = B4XTable1.GetColumn(ColumnId)
    B4XTable1.CreateDataView($"1=1 ORDER BY ${col.SQLID}, c0"$)
End Sub

Sub tbl_TableOfAssets_HeaderClicked (ColumnId As String)
    Dim col As B4XTableColumn = tbl_TableOfAssets.GetColumn(ColumnId)
    Dim Direction As String
    
    tbl_TableOfAssets.CreateDataView($"1=1 ORDER BY ${col.SQLID} ${Direction}, c0 ASC"$)

    Sleep(50)   
    If tbl_TableOfAssets.lblSort.Text = Chr(0xF0DE) Then
        tbl_TableOfAssets.lblSort.Text = Chr(0xF0DD)
    Else
        tbl_TableOfAssets.lblSort.Text = Chr(0xF0DE)
    End If
End Sub