我通过代码创建一目录树,目录树设置有复选框。
想要的效果是:目标树可以展开,但不能选择和取消选择
下面是我做的,但始终能选择:
AfterLoad
Dim TV As WinForm.TreeView = e.Form.Controls("TreeView1")tv.BuildTree ("表B","权限|模块|窗体")tv.CheckBoxes = Truetv.ReadOnly = BooleanEnum.True