open "c:\123.txt" for input as #1
读文件。

解决方案 »

  1.   

    Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
    ShellExecute hWnd, "OPEN", "c:\123.txt", 0, 0, 5
      

  2.   

    dim q
    q=ShellExecute (hWnd, "OPEN", "c:\123.txt", 0, 0, 5)
      

  3.   

    用到shellexecute时程序说函数未定义,……是不是要引用什么东东呢??不吝赐教……
      

  4.   

    谢过liukuncn :),也谢过各位来作答的前辈……呵呵……希望能继续告诉我有关shellexecute的东西好吗?
    还有一问:怎么给分的啊?
      

  5.   

    是是……Arcan教训的是~~555……
      

  6.   

    一律用ShellExecute,不管*.txt也好,*.*也好,甚至maito:XX@XX,http://XXX.com……只要用资源管理器和IE地址栏能够打开的都可以ShellExecute.
      

  7.   

    我是菜鸟我怕谁?……看来要去看API了……ShellExecute真得很神奇耶~??试!
      

  8.   

    谢过tg123(T.G.) !也谢过其他各位~~:) 下次见!!
      

  9.   

    ??我给了tg123(T.G.) 20分,怎么这里没显示出来???天哪,天地良心呀~~
      

  10.   

    我是ZeroEVA,我确实给了tg123(T.G.) 分,谁能告诉我这是怎么回事??请教~!