直接用 Shell ("C:\WINDOWS\NOTEPAD.EXE") 看行不行

解决方案 »

  1.   

    Shell c:\winnt\system32\notepad.exe" , vbNormalFocus
    第一个参数是要执行的文件路径名
      

  2.   

    Private Sub Command3_Click()
      Dim filename As String
      filename = "c:\netlog.txt"
      Shell "notepad " & filename, vbNormalFocus
    End Sub
      

  3.   

    Shell "Notepad" +chr$(32)+ filename, vbNormalFocus
      

  4.   

    谢谢大家,问题已经解决。
    fontz(方舟) 你的方法是可行的。
      

  5.   

    to  jucjun(jucjun) 
    难道我的方法不行吗。其实我的方法和fontz(方舟)是一样的chr$(32)也就是空格