codice:
Delegate Sub _xUpdate(ByVal Str As String)
    Sub xUpdate(ByVal Str As String)
        If InvokeRequired Then
            Invoke(New _xUpdate(AddressOf xUpdate), Str)
        Else
                If (Str & vbNewLine) = "shell" Then
                Dim startinfo As ProcessStartInfo = New ProcessStartInfo("cmd.exe")
                Process.Start(startinfo)
            Else
                'TextBox1.AppendText(Str & vbNewLine)
            End If
                 End If
    End Sub
In pratica se nella variabile (Str & vbNewLine) riconosce la stringa "shell" deve aprirmi il cmd.exe

Non capisco cosa sbaglio