Programm ausführen mit runas

[met]

Hallo,
warum kommt bei folgendem Programm keine Frage nach dem Passwort?

Module Module1
    Sub Main()
        Dim Text As String
        Console.WriteLine("Hallo")
        Microsoft.VisualBasic.Interaction.Shell("runas /u:EIBE2000.PC\met regedit")

        'Text = Console.ReadLine()
    End Sub
End Module

Hat jemand 'ne Ahnung?