資料庫的地方有些不懂 ?(編號：5344)

Dim LastCol As Integer
Dim LastSort As Integer
Private Sub Form_Load()
LastCol = -1
　　LastSort = 0
End Sub
Private Sub MSHFlexGrid1_Click()
If MSHFlexGrid1.Col ＜ ＞ LastCol Then
　　　　　　　　　　　　　 ^^^^^^^^
　　　　　　　　　　　　這裡的值應是 -1
　　　　　　　　　　　　為甚麼要用 -1 呢 ?
　　　　　　　　　　　　用1有甚麼不一樣呢 ?
　　　　LastSort = flexSortGenericAscending
　　Else
　　　　If LastSort = flexSortGenericAscending Then
　　　　　　LastSort = flexSortGenericDescending
　　　　Else
　　　　　　LastSort = flexSortGenericAscending
　　　　End If
　　End If
　　MSHFlexGrid1.Sort = LastSort
　　LastCol = MSHFlexGrid1.Col
End Sub