How To Run Install File From Textbox

I am trying to run an install file from a text box that I browse with admin rights and I am having tough luck because the password wont be accepted from inside the code and the file wont be executed even if write the code my self

Here's the code that I use:
Option Explicit On
Public Class Form1
rivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim oShell
Dim text As String
[Code] .....

While if I replace the code for the execute button with this one with this code it seems to be opening the word2007.
Code:
Option explicit
Dim oShell
set oShell= Wscript.CreateObject("WScript.Shell")
'Replace the path with the program you wish to run c:program files...
oShell.Run "RunAs /noprofile /user:administrator ""C:Program FilesMicrosoft OfficeOFFICE12WINWORD.EXE"""