vb.net - VB6/VBA MSFlexGrid 到 VB.NET DataGridView

Question

再一次，更精彩 VB6 至 VB.NET 移民。

好的，当然，这不一定是定义中的“问题”，但它将回答用户将来会遇到的许多问题，并希望也能回答我的问题。

我正在尝试编译 MSFlexGrid 中的属性和函数列表在 VB6/VBA 和 .NET 中 DataGridView提供相同或有些相同的用途。我不仅需要他们，而且我相信还有更多人需要。

到目前为止，这就是我所拥有的，我希望其他人可以随意添加和编辑。我希望这可以帮助我和其他人将旧控件转换为具有与旧代码相同功能的 .NET 控件。如果您想添加，请在 BlockQuote 中输入关系并在其专有位置输入定义:

VB6/VBA                          VB.NET

MSFlexGrid.Cols         :::::    DataGridView.ColumnCount
MSFlexGrid.Col          :::::    ???
MSFlexGrid.Rows         :::::    DataGridView.RowCount
MSFlexGrid.Row          :::::    ???
MSFlexGrid.TextMatrix   :::::    DataGridView.Item(Int32,Int32).Value
MSFlexGrid.TextArray    :::::    ???
Add More Here           :::::    Add More Here

定义 VB6 :

MSFlexGrid。 列 = 返回或设置 中的总列数MSFlexGrid .

MSFlexGrid。 上校 = 返回或设置 中事件单元格的坐标MSFlexGrid .

MSFlexGrid。 行 = 返回或设置 中的总行数MSFlexGrid .

MSFlexGrid。 行 = 返回或设置 中事件单元格的坐标MSFlexGrid .

MSFlexGrid。 文本矩阵 = 返回或设置任意单元格的文本内容。此属性允许您在不更改 的情况下设置或检索单元格的内容。行 和 上校 属性(property)

MSFlexGrid。 文本数组 = 返回或设置任意单元格的文本内容。此属性允许您在不更改 的情况下设置或检索单元格的内容。行 和 上校 特性。

在这里添加更多

定义 VB.NET:

数据网格 View 。 列数 = 获取或设置中显示的列数数据网格 View .

数据网格 View 。 行数 = 获取或设置中显示的行数数据网格 View .

数据网格 View 。 项目(Int32,Int32).值 = 提供索引器来获取或设置位于具有指定索引的列和行交叉处的单元格，然后返回值。

在这里添加更多

Answer 1

对于 Row 和 Col 属性，您可以使用以下内容:

    Public Class MyGrid
    Inherits System.Windows.Forms.DataGridView
(...)
    Public Property Col() As Integer
        Get
                Return Me.CurrentCell.ColumnIndex
        End Get
        Set(ByVal value As Integer)
                    Me.CurrentCell = Me(value, Me.CurrentCell.RowIndex)
            End If
        End Set
    End Property
(...)
    Public Property Row() As Integer
        Get
                Return Me.CurrentCell.RowIndex
        End Get
        Set(ByVal value As Integer)
                    Me.CurrentCell = Me(value, Me.CurrentCell.ColumnIndex)
            End If
        End Set
    End Property
(...)
End Class

然后继续查找和匹配每个属性、方法和事件与原始控件。