[sami2015]

Private Sub DataGridView1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles DataGridView1.MouseUp
If DataGridView1.SelectedRows.Count = 3 Then
Dim r1 As DataGridViewRow = DataGridView1.SelectedRows(2)
TextBox1.Text = r1.Cells(0).Value
TextBox2.Text = r1.Cells(1).Value
TextBox3.Text = r1.Cells(2).Value
TextBox4.Text = r1.Cells(3).Value
TextBox5.Text = r1.Cells(4).Value
Dim r2 As DataGridViewRow = DataGridView1.SelectedRows(1)
TextBox6.Text = r2.Cells(0).Value
TextBox7.Text = r2.Cells(1).Value
TextBox8.Text = r2.Cells(2).Value
TextBox9.Text = r2.Cells(3).Value
TextBox10.Text = r2.Cells(4).Value
Dim r3 As DataGridViewRow = DataGridView1.SelectedRows(0)
TextBox11.Text = r3.Cells(0).Value
TextBox12.Text = r3.Cells(1).Value
TextBox13.Text = r3.Cells(2).Value
TextBox14.Text = r3.Cells(3).Value
TextBox15.Text = r3.Cells(4).Value
End If
End Sub