Ciao,
presumo che lerrore sia qui:
>>TROVA.Text = dGV1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value
prova così:
If dGV1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value Is DBNull.Value Then
TROVA.Text = ""
else
TROVA.Text = dGV1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString
end if
___________________________________________________________________
Ricorda che, accettare la risposta è un modo di ringraziare chi ci ha aiutato ed evidenziare che il problema è stato risolto.
http://www.infomidia.it
Domenico