You can also try something like:
For row as Integer = 0 to dt.Rows.Count - 1
GetTextBoxForRow(row).text = dt.Rows(row).Item("EUtranCellFDD_Name")
Next
Function GetTextBoxForRow(ByVal rowNumber as Integer) as TextBox
Select Case rowNumber
Case 0 : return EUtran1_txt
Case 1 : return EUtran2_txt
Case 2 : return EUtran3_txt
Case 3 : return EUtran4_txt
Case 4 : return EUtran5_txt
Case 5 : return EUtran6_txt
End Select
End Function
In this solution the loop will run for the only available number of rows.