主题：[求助]文件管理器问题

双击文件管理器通常是打开文件管理器中选中的文件。是否可以通过双击文件管理器中选中的文件，显示另一个弹出窗口。谢谢！

代码写到 BeforeOpenFile 事件。

 

msgbox(2)
e.Cancel = True

谢谢，搞定。

谢谢甜版。但是有另一个问题，如果文件管理器中没文件，双击管理器就没有用了。如何解决。代码：

e.Cancel=True
With Tables("辅助资料基本表")
    If .Current IsNot Nothing Then
        If Forms("辅助资料录入").opened Then
            Forms("辅助资料录入").show
        Else
            Forms("辅助资料录入").Open()
        End If
    Else
        MessageBox.Show("请选择添加文件的患者","提醒",MessageBoxButtons.OK,MessageBoxIcon.Information)
        Return
    End If
End With

 呃，文件管理器没有文件，就肯定是不会触发事件的，双击管理器就不应该有任何操作。

我是想通过双击它，调出另一个窗口。有关文件的添加、删除、更改等操作，在另一个窗口中完成。因为每一个文件对应的详细信息不一样，想这些详细信息与该文件关联。

看来还是得将其换成文本框了。

 

单独做一个文件管理器窗口，放入文件控件，绑定此列。

 

然后给控件绑定事件。

全局代码

 

Public Sub listBox1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs)
    msgbox(2)
End Sub

 

 

AfterLoad事件

 

Dim obj As windows.Forms.Listbox = e.Form.Controls("FileManager1").basecontrol.Controls("SplitContainer1").panel1.Controls("ListBox1")
AddHandler obj.DoubleClick, addressOf listBox1_DoubleClick