Никогда не размещайте фотографии кода. Мы не можем скопировать это и попробовать. Это работает для меня с небольшим изменением.
Private Sub DataGridView1_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellDoubleClick
Dim aa = DataGridView1.CurrentRow.Cells(0).Value
Dim selRow = dt.Select($"ID = {aa}")
TextBox1.Text = selRow(0)("Type")
End Sub
У меня есть поле с именем ID и поле с именем Type в DataTable, с которым я тестирую. Я думаю, что. Элемент DataRow хочет порядковый номер, поэтому я просто использовал значение по умолчанию, которое принимает строку.