[alshandodi]

السلام عليكم اخي 

هذا الكود في ضعه بين الأكواد

كود :

   Private Sub DataGridView1_SelectionChanged(sender As Object, e As EventArgs) Handles DataGridView1.SelectionChanged
'=============================
       Try

           Dim currentrw As Integer
           currentrw = DataGridView1.CurrentRow.Index
           Label1.Text = DataGridView1.Item("ColumName", currentrw).Value.ToString()
       Catch ex As Exception
       
End Try
'=========================
   End Sub

للإيفنت SelectionChanged