Visual Basic - datagrid1

Necesito recoger el valor que existe en una celda determinada del Datagrid, al hacer dobleclick.

'SALUDOS!!
Private Sub DataGrid1_DblClick()
Dim Renglon As Integer
Dim Columna As Integer
Renglon = DataGrid1.Row
Columna = DataGrid1.Col
MsgBox "Renglon: " & CStr(Renglon) & " Columna: " & CStr(Columna), vbInformation
End Sub