Your code
For i As Integer = 1 To 4
txtRegion_ID.Text = ds.Tables(0).Rows(i).Item(0).ToString
txtRegion_Name.Text = ds.Tables(0).Rows(i).Item(1).ToString
Next
is running on every record.
Step out after the second record and you will have only the second record displayed.
For i As Integer = 1 To 4
txtRegion_ID.Text = ds.Tables(0).Rows(i).Item(0).ToString
txtRegion_Name.Text = ds.Tables(0).Rows(i).Item(1).ToString
if i = 2 then break
end if
Next