Premetto che io l'ho fatto i c# ma credo sia uguale diciamo tu hai una funzione così:
private sub funzione(object sender, System.EventArgs e)

MessageBox.Show dataGrid1.CurrentCell.RowNumber
MessageBox.Show dataGrid1.CurrentCell.ColumnNumber)
MessageBox.Show dataGrid1(dataGrid1.CurrentCell.RowNumber,dataGrid 1.CurrentCell.ColumnNumber)
End Sub

Se aggiungi funzione nelle proprietà del datagrid all'evento CurrentCellChanged dovrebbe funzionare se è ho capito bene quello che ti serve...L'ho tradotto adesso da c# a VB senza provarlo non so se c'è qualche errore!