以下是引用mxko在2017/2/22 10:54:00的发言:
那对于 窗口管理 能不能 加搜索 功能
做一个任务管理,写代码
Dim frm = windows.forms.form.activeform
If frm IsNot Nothing Then
If frm.Text = "窗口管理" Then
Dim trv = frm.controls("TreeView1")
Dim nd = trv.nodes.find(vars("窗口"),True)
If nd.Length > 0 Then
trv.SelectedNode = nd(0)
trv.Select
MyTimers("计划1").Enabled = False
End If
End If
End If
调用代码
vars("窗口") = "窗口2"
MyTimers("计划1").Enabled = True
Syscmd.Project.FormDesigner()