请教下ColumnHeaderCell的SortMode

barrylei · barrylei

你按Robert的改一下，看看还有没有问题，另外，我的code里的“headerCell1”也要换成你要点击的那个header的名字。
我的代码只是一个思路，不要直接应用到你的工程里，适当的需要修改一下的。：-）

chenf1980 · chenf1980

我当然知道要换成我自己所对应的单元格名称了，问题就是在于换了之后，还是错误的。
If (e.RowIndex = -1) Then
            If e.CellName = "配送予定日" Or e.CellName = "予定時間" Then
                  Dim sortorder As SortOrder = i Mod 2 + 1
                  Dim sortitem1 As New SortItem
                  sortitem1.CellName = "txtYotihiF"
                  sortitem1.SortOrder = sortorder
                  Dim sortitem2 As New SortItem
                  sortitem1.CellName = "txtYoteiTimeF"
                  sortitem1.SortOrder = sortorder
                  Dim mySort() As SortItem = {sortitem1, sortitem2}
                  dw_6.Sort(mySort)
                  TryCast(dw_6.ColumnHeaders(0).Cells(e.CellName), ColumnHeaderCell).SortGlyphDirection = sortorder
                  i = i + 1
            End If
END

barrylei · barrylei

把下面的sortitem1改成sortitem2，就好了。sortitem2没有设置值，所以会崩了。（不好意思，是我原来的代码copy的时候忘记改了）

Dim sortitem2 As New SortItem
sortitem1.CellName = "txtYoteiTimeF"
sortitem1.SortOrder = sortorder

		自动登录	找回密码
密码			立即注册

请教下ColumnHeaderCell的SortMode

活字格认证