電気ウナギ的○○

About Home

DataView で並び替えた結果を保持したまま DataTable にキャストできんのかいな

shinoda (2014年10月 2日 19:22)
元の 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 マスターの方、良い方法をアドバイスプリーズ!!

電気ウナギ的○○

電気ウナギ的○○

About Back

コメント(0)

電気ウナギ的○○

電気ウナギ的○○

About Back

トラックバック(0)

トラックバックURL: https://blog.netandfield.com/mt/mt-tb.cgi/3130

電気ウナギ的○○

About This Site

電気ウナギ的○○
岩国在住。広島で働く超零細IT企業社長のいわゆる社長日記。
何か、酒と食い物のことばかり書いているようで・・・お察しのとおり、肥満体です:-)


2011/06/24
iPhone用サイト公開

Create with jQuery, jQTouch.


CLOSE