VB怎样打开文件

来源:百度知道 编辑:UC知道 时间:2024/05/09 16:22:15
不是打开TXT文件,是EXE文件

思路:先是一个对话框,问你要不要打开,要的话,打开D:\Program Files\TTPlayer\TTPlayer.exe,不要的话退出

Private Sub Form_Load()
answer = MsgBox("是否打开千千静听?", vbYesNo, "询问")
If answer = vbYes Then
Shell "D:\Program Files\TTPlayer\TTPlayer.exe", vbNormalFocus
Unload Me
Else
Unload Me
End If
End Sub