DataView で並び替えた結果を保持したまま DataTable にｷｬｽﾄできんのかいな[ﾌﾟﾛｸﾞﾗﾐﾝｸﾞ]
(2014-10-02 19:22:41) by shinoda

元の DataTable には｢出席番号｣｢名前｣｢点数｣が適当な順番で入っている｡
例えば､

1 ﾛﾊﾞｰﾄ 25
2 ﾐｯﾁｪﾙ 89
3 ｸﾘｽ 25
4 ﾌﾞﾗｳﾝ 67
5 ｷﾖｼ 18

みたいに出席番号順とかで｡

これを､｢点数の降順｣｢出席番号の昇順｣という条件でｿｰﾄしたい｡

2 ﾐｯﾁｪﾙ 89
4 ﾌﾞﾗｳﾝ 67
1 ﾛﾊﾞｰﾄ 25
3 ｸﾘｽ 25
5 ｷﾖｼ 18

にしたいわけやね｡

DataTable では並び替え(ｿｰﾄ)は出来ないから､一旦 DataView を作成し､そこでｿｰﾄをする｡

Dim dv As DataView = ds.table.DefaultView
dv.Sort = "tokuten DESC, bangou"

こんな風に｡
ここまでは良い｡実際､並び替えは正常に行われたし｡

で､並び替えた結果を別の DataTable に｢並び替えた状態を保持したまま｣ｺﾋﾟｰしたいんだけど､

Dim new_ds As New HogehogeDataSetView
new_ds.table.Merge(CType(dv.Table, HogehogeDataSetView.tableDataTable))

なんてｷｬｽﾄしてﾏｰｼﾞしちゃうと､｢並び順がﾘｾｯﾄ｣されちゃうのね･･･

仕方ないので､

Dim new_ds As New HogehogeDataSetView
For Each dvr As DataRowView In dv
    Dim dr As HogehogeDataSetView.tableRow = CType(dvr.Row, HogehogeDataSetView.tableRow)
    new_ds.table.ImportRow(dr)
Next
new_ds.AcceptChanges()

なんてやったんだけど(並び替えた結果を1件1件頭から追加していったわけやな)､なんか美しくないな｡
一発でﾋﾟｼっとｾｯﾄしたいわ｡

VB.NET ﾏｽﾀｰの方､良い方法をｱﾄﾞﾊﾞｲｽﾌﾟﾘｰｽﾞ!!
ｺﾒﾝﾄ投稿
次の記事へ >
< 前の記事へ
TOPへ戻る

Powered by
MT4i 3.0.8