Как прочитать значение столбца из массива

Question

Ниже приведен код VB6, где в коде VB6 передаются два параметра для чтения значения столбца из массива коллекции.Как перенести этот код в Vb.Net.Даже ниже я упомянул мастер-сгенерированный код VB.Net.

Private m_colBookmarks As Collection
Private Const COL_ERR_BKMARK_COMP_TITLE = 2
Private Property Get BookmarkCompTitle(ByVal strBookmarkNum As String) As String          
    BookmarkCompTitle = m_colBookmarks(strBookmarkNum)(COL_ERR_BKMARK_COMP_TITLE)
End Property

вот код vb.net.

 Private ReadOnly Property BookmarkCompTitle(ByVal strBookmarkNum As String) As String
    Get          

        BookmarkCompTitle = m_colBookmarks.Item(strBookmarkNum)(COL_ERR_BKMARK_COMP_TITLE)
    End Get
End Property

Answer 1

Option Strict On

Imports System.Collections.ObjectModel

Public Class Class1
    Private m_colBookmarks As Collection(Of String())
    Private Const COL_ERR_BKMARK_COMP_TITLE = 2

    ' here Is the vb.net code.
    Private ReadOnly Property BookmarkCompTitle(ByVal strBookmarkNum As String) As String
        Get
            Dim bookmarkNum As Integer

            If Not Int32.TryParse(strBookmarkNum, bookmarkNum) OrElse bookmarkNum < 0 Then                    
                Throw New ArgumentException("strBookmarkNum must be a positive integer.")
            End If

            BookmarkCompTitle = m_colBookmarks.Item(bookmarkNum)(COL_ERR_BKMARK_COMP_TITLE)
        End Get
    End Property
End Class