如下排序代码,希望空白的内容不参与排序。
但发现错误显示sortkey不属于表。
后来在设置标识列后错误消失,但是sortkey始终不能赋值。
去了SQL里面看,这一列数据一致是1,2,3,4,5,6.。。。的排序。
请问为何?
For Each dr As Row In CurrentTable.Rows
If dr.Isnull(CurrentTable.ColSel) Then
dr("_SortKey") = 1
Else
dr("_SortKey") = 0
End If
dr.save
Next
Dim tt As String=CurrentTable.Cols(CurrentTable.ColSel).Name
CurrentTable.Sort="_SortKey," & tt
插入行的sortkey 是OK的,但是不能通过代码修改。
此主题相关图片如下:capture.jpg
[此贴子已经被作者于2020/6/29 11:37:25编辑过]