Private Sub TreeView1_DoubleClick(ByVal sender As Object, ByVal e As _
  System.EventArgs) Handles TreeView1.DoubleClick
    'hier wir das Treeview programmiert
    If Not TreeView1.SelectedNode Is Nothing Then
        Select Case TreeView1.SelectedNode.Name
            Case "Roboter Antrieb"
                Using RoboterAntrieb
                    RoboterAntrieb.Text = "Roboter Antriebein"
                    RoboterAntrieb.ShowDialog()
                    Me.Hide()
                    Kamera.Hide()
                End Using
            Case "Kamera"
                Using Kamera
                    Kamera.Text = "Kamera"
                    Kamera.ShowDialog()
                    Me.Hide()
                    RoboterAntrieb.Hide()
                End Using
        End Select
    End If
End Sub

Gruß
Christoph