DataTableで行インデックスを検索

Question

前と次の行にアクセスできるようにDataTableの行インデックスを取得できますか？たとえば、私は2つの列のChapterTitleとPageURLを含むDataTableを持っています。これは本の目次のためのものです。 ChapterTitleは章名であり、PageURLは章（chaptername.html）を含むHTMLページです。本のある章に入るとき、私は次の章と前の章を知りたいと思っています。

私が現在使っている章を見つけたら、次の行と前の行を得ることができますか？あなたがdt.Columns.PrimaryKeyを設定する場合は、表を策定するときにだけ、あなたは簡単にLINQを使用できるように設定した場合

ChapterTable.Select("PageURL = '" & PageURL& "'") 

Answer 1

Private Sub LoadDataAndFindRow 
Dim dt As New DataTable() 
dt.Columns.Add("ChapterTitle") 
dt.Columns.Add("PageURL") 

Dim dr As DataRow = dt.NewRow() 
dr(0) = "Aarons Book" 
dr(1) = "www.AaronsBook.com" 
dt.Rows.Add(dr) 

dr = dt.NewRow() 
dr(0) = "Tims Book" 
dr(1) = "www.TimsBook.com" 
dt.Rows.Add(dr) 

dr = dt.NewRow() 
dr(0) = "vincents Book" 
dr(1) = "www.vincentsBook.com" 
dt.Rows.Add(dr) 

dr = dt.NewRow() 
dr(0) = "Xi's Book" 
dr(1) = "www.XisBook.com" 
dt.Rows.Add(dr) 

Dim i As Integer = FindRow(dt, "Tims Book") 
Dim prevRowID As Integer = i - 1 
Dim nextRowID As Integer = i + 1 

End Sub 


Function FindRow(ByVal dt As DataTable, ByVal chapterTitle As String) As Integer 
For i As Integer = 0 To dt.Rows.Count 
If dt.Rows(i)("ChapterTitle") = chapterTitle Then Return i 
Next 
Return -1 
End Function 

Answer 2

は（）、あなただけ（PK）findby使用することができます。 を「データテーブルの名前を読み取り可能にする名前を付けます：

dim query = from chapters in dt.AsEnumerable _ 
      where chapters("chapterTitle").equals(<<your criteria>>) _ 
      select chapters 

newDT = iif(chapters.count > 0, chapters.copyToDataTable(), nothing) 

chapters.toDataRow..etcを変更するか、または取得するだけです。

HTH