急盼vb高人指点：如何实现以下操作？？？？
有一个exe文件，为安全需要，后缀名改为txt了，用vb如何实现编写一个小程序执行该exe文件？？？？？请高人示例指点！！！（懂一点vb，写个一点小程序），急啊？？？
[解决办法]

Private Sub Command1_Click()
Name "c:\OldName.TXT" As "c:\NewName.exe"
RetVal = Shell("c:\NewName.exe", 1)
End Sub