Bom dia, se o seu app estiver como admin mode, seu shell vai esta tambem.
ou faça assim
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim process As New Process()
process.StartInfo.Arguments = "/c ipconfig & pause"
process.StartInfo.FileName = "cmd.exe "
process.StartInfo.Verb = "runas"
process.Start()
End Sub
End Class
