[VB 2010] recupero valore di una cella di una datagrid

[inviasubito]

salve, non riesco a fare questo procedimento..
in pratico vorrei cliccare su una cella in una datagrid e inserire il valore in una textbox.

ecco il codice:

Dim astring As String
astring = CType(DataGridView.Item(0, DataGridView.CurrentCell.Value).Value.ToString(), String)

msgbox(astring)

potete aiutarmi?
grazie in anticipo