做第一个项目的时候 并列窗口双击是可以关闭的
1.内部函数中增加 “双击关闭”
Dim e As System.EventArgs = Args(0)
Dim Sender As Object = Args(1)
Dim frm As WinForm.Form = Forms.ActiveForm
If frm IsNot Nothing Then
If frm.Name <> "主窗口" Then
DataTables.Save
Forms(frm.Name).Close
End If
End If
2.全局代码中:Public Sub C1DockingTab_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Functions.Execute("双击关闭",e,Sender)
End Sub
同样的代码 现在用在另一个项目中实现不了了,,是哪里出错了吗
[此贴子已经被作者于2014-11-8 20:13:39编辑过]