データグリッドでソートを行う場合 (ID:111977)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

どうも継承すれば要らん機能が働かなくなるみたい(？)…それもどうかと思うんだけどｗ
これが正常に動くということは…なんかの設定変えれば良さそうなんだけど…いまいち
分からなかったので…詳しく調査して報告してくださぁい(＞▽＜)ノ(ぉ
[VB.NET2003]
    Public Class DataViewNeo
        Inherits DataView

Sub New(ByVal DataTableX As DataTable)
            MyBase.New(DataTableX)
        End Sub

End Class

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        DemonstrateDataView()
    End Sub

Private Sub DemonstrateDataView()
        ' Create one DataTable with one column.
        Dim myTable As DataTable = New DataTable("myTable")
        Dim colItem As DataColumn = New DataColumn("item", Type.GetType("System.String"))
        myTable.Columns.Add(colItem)
        ' Add five items.
        Dim NewRow As DataRow
        Dim i As Integer
        For i = 0 To 4

NewRow = myTable.NewRow()
            NewRow("item") = "Item " & i
            myTable.Rows.Add(NewRow)
        Next
        myTable.AcceptChanges()
        ' Create DataView objects.
        'Dim firstView As DataView = New DataView(myTable)
        Dim firstView As DataViewNeo = New DataViewNeo(myTable)

' Change the values in the table.
        myTable.Rows(0)("item") = "tiger"
        myTable.Rows(1)("item") = "fish"
        myTable.Rows(2)("item") = "cat"
        myTable.Rows(3)("item") = "dog"
        firstView.Sort = "item DESC"
        Me.DataGrid1.DataSource = firstView
    End Sub

←解決時は質問者本人がここをチェックしてください。

戻る