Ho trovato.....
nel DG metto: OnSelectedIndexChanged="Cancella"

Public Sub Cancella (sender As Object, e As EventArgs)

LblSelezione.Text = "Codice soc: " & Datagrid1.SelectedItem.Cells(1).Text &" Cod Cont"&Datagrid1.SelectedItem.Cells(2).Text .......


Grazie per i suggerimenti e buona Pasqua a tutti