ก่อนจะ Find ก็ต้องตั้ง Primary Key The first example defines a single column as the primary key
Dim columns(1) As DataColumn
columns(0) = workTable.Columns("CustID")
workTable.PrimaryKey = columns
The following example defines two columns as a primary key.
Dim keyColumn(1) As DataColumn
keyColumn(0) = workTable.Columns("CustLName")
keyColumn(1) = workTable.Columns("CustFName")
workTable.PrimaryKey = keyColumn
Find กรณีใช้ 1 column เป็น Primary key
Dim foundRow As DataRow
Dim findValue As String
findValue = "abc"
foundRow = workTable.Rows.Find(findValue)
If Not (foundRow Is Nothing) Then
foundRow("workColumn") = xxx
End If
Find กรณีใช้มากกว่า 1 column เป็น Primary key
Dim foundRow As DataRow
Dim findValues(1) As String
findValues(0) = "abc1"
findValues(1) = "abc2"
foundRow = workTable.Rows.Find(findValues)
If Not (foundRow Is Nothing) Then
foundRow("workColumn") = xxx
End If
