If e.ColumnIndex=colonnaMail.Index Then
  e.Value=IIf(Ctype(DataGridView.Rows(e.RowIndex).DataBoundItem,TuoOggetto).Mail<>String.Empty,True,False)
End If