para filtrar lo que queres abrir:
tuOpen.Filter = "Ejecutables|*.exe"
Para mostrar el open:
tuOpen.ShowDialog()
Luego para saber la ruta completa de tu archivo selecionado
Dim xRuta as String = tuOpen.FileName
Ahora para ejecutar un exe usas este código:
Shell(xRuta)
Mas info podes ver acá:
http://msdn.microsoft.com/es-ar/libr...kx(VS.80).aspx http://www.programacion.com/foros/37/msg/200363/