作者aya92 (aya92)
看板Visual_Basic
标题Re: [VB2005]treenode中check的问题
时间Mon Feb 12 19:45:12 2007
我贴上我的程式码
Public Class Form1
Sub chk(ByVal obj As TreeNode, ByVal boo As Boolean)
For Each child As TreeNode In obj.Nodes
If boo = False Then
child.Checked = False
Else
child.Checked = True
End If
Next
End Sub
Private Sub TreeView1_Click(ByVal sender As Object, ByVal e As
System.EventArgs) Handles TreeView1.Click
~~~~~~~~~~~~~~~~~~~~~~~~~~
Dim a As TreeNode = TreeView1.SelectedNode
Dim boo As Boolean
boo = a.Checked()
chk(a, boo)
End Sub
End Class
但这样selectednode并不等於你打勾的，而是被选择有反白的。
到这里我就不会改了...
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.56.227.4