Private Sub GetVariableValue(ByVal myform As System.Windows.Forms.Form, _
      ByVal Variable As String)
        Dim fields As FieldInfo() = myform.GetType().GetFields()
        For Each fld As FieldInfo In fields
            If fld.Name = Variable Then
'Value kann alles sein, was an eigenen Public  Variablen in der Form 
' gefunden wird.
                Dim value = fld.GetValue(myform)
                If Not (value Is Nothing) Then
'Da ich mit dem Namen fld.Name Prüfe, ob es meine clickedCell Variable ist, 
' kann ich es hier zu einem DatagridviewCell benennen. Und nun auf alle 
' Attribute zugreifen.
                    Dim tmpvalue As DataGridViewCell = value
                    MsgBox(tmpvalue.Tag)
                End If
                Return
            End If
        Next
    End Sub
 
    Private Sub ToolStripButton1_Click(sender As System.Object, e As _
      System.EventArgs) Handles ToolStripButton1.Click
 
'Da ich in einer eigenen Funktion das frm.bringtofront benutze ist mein 
' Aktuelles Fenster immer 0.
 
 GetVariableValue(Panel1.Controls.Item(0), "clickedCell")
    End Sub

VB.net 2.0
VisualStudio 2010