Cita:
Iniciado por David el Grande 
Puedes usar el evento Change del TextBox, dentro de él sólo tienes que hacer un Select Case o If para mostrar el botón que corresponda.
Gracias,
Otra Consulta Mas, Con Esta Fórmula
Dim x
x = Shell("C:\Program Files\Internet Explorer\iexplore.exe")
Puedo Abrir Aplicaciones Tipo .exe , Pero No Me Deja Abrir Una Archivo De Acceso Directo, Un LNK De Un .exe
Alguna Idea???
Gracias De Nuevo Por Todo