dljdlj70000

我想实现当在目录窗口或资源管理器中选中文件时,得到此文件的文件名.和路径名   请各位大虾帮忙

dljdlj70000

就是我在资源管理器上双击某个文件（已和我要编的程序建立关联关系）时被我要编的程序关联打开  我这个程序如何获得这个文件的名称和路径

dljdlj70000

老大，我不需要时时刻刻监控他  只要双击和我关联的程序的文件时获得文件名和路径

Nothing

很简单，在这个程序中调用 Command 函数就可以了

Command

说明

当从命令行装入 Visual Basic 时，/cmd 之后的命令行的任何部分作为命令行的参数传递给程序。下面的示例中，cmdlineargs 代表 Command 函数返回的参数信息。

VB /cmd cmdlineargs

对于使用 Visual Basic 开发并编译为 .exe 文件的应用程序，Command 返回出现在命令行中应用程序名之后的任何参数。例如：

MyApp cmdlineargs

想知道如何在正在使用的应用程序的用户界面中改变命令行参数，请搜寻关于“命令行参数”的帮助。

本示例在某个函数中用 Command 函数获得命令行参数，并将命令行参数以 Variant 类型之数组返回。<

dljdlj70000

MDIForm.Picture1.LinkExecute "asd"
将这个发送要打开的文件名就可以了，一般是Commend函数，例如
MDIForm.Picture1.LinkExecute Commend

老大，上面是你昨天写的，你把Command写成Commend
第二天上午我花了100分 在cdsn上求助
才知道用Command  和你现在说的Command函数大致一样  呵呵你们都是高手啊
不过直接MDIForm.Picture1.LinkExecute Command就行了

richtextbox.loadfile  Command 就可以打开点击的文件了

非常谢谢落花老大

dljdlj70000

Private Sub MDIForm_Load()
If App.PrevInstance Then
        frmMDI.LinkTopic = ""     ' 这两行用于清除新运行的程序的DDE服务器属性，
        frmMDI.LinkMode = 0
        frmMDI.Picture1.LinkMode = 0              '--
        frmMDI.Picture1.LinkTopic = "DDE|frmMDI"  '  |______连接DDE程序并发送数据/参数
        frmMDI.Picture1.LinkMode = 2              '  |      “|”为管道符，是“退格键”旁边的竖线，
      
        frmMDI.Picture1.LinkExecute Command
        End                              '  结束新程序的运行
End If


================================

Private Sub MDIForm_LinkExecute(CmdStr As String, Cancel As Integer)

frmMDI.Picture1.Tag = Command
Me.WindowState = 2
Me.SetFocus
Dim fso
Set fso = CreateObject("scripting.filesystemobject")
Dim dirx As String
dirx = Right(Command, Len(Command) - 1)
dirx = Left(dirx, Len(dirx) - 1)
If fso.FileExists(dirx) Then
CreateNewDocument
        frmMDI.ActiveForm.rtfText.LoadFile dirx
        frmMDI.ActiveForm.Caption = dirx
      Else: MsgBox "不存在"
   End If
Cancel = False ' '如果为TRUE 则客户端要出错
End Sub

最终终于成功  最后再次谢谢落花老大

Nothing

你可能没有安装MSDN，其他装了MSDN，一查里面的函数就可以了。
不好意思我将函数名称输入错了。