VB树控件 100
想了解VB树控件的一些知识,越详细越好。1,树控件如何动态添加。2,树控件如何与数据库关联动态添加3,树控件一些事件操作方法。4,如何得到树控件中各个子键的属性。最好有实...
想了解VB树控件的一些知识,越详细越好。1,树控件如何动态添加。2,树控件如何与数据库关联动态添加3,树控件一些事件操作方法。4,如何得到树控件中各个子键的属性。最好有实例。
还有就是为什么我的程序在别的电脑不能运行?是不是还要把其它的一些文件也要复制过去。我可以再加分。 展开
还有就是为什么我的程序在别的电脑不能运行?是不是还要把其它的一些文件也要复制过去。我可以再加分。 展开
1个回答
展开全部
问题一:找到了一点相关资料,你自己再消化下。
VB2005中树控件的一点使用方法
1、如何实现当子节点全部选中/取消,则父节点选中/取消
2、如何实现当父节点选中/取消,则子节点全部选中/取消
Private Sub treeView1_AfterCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs)
If e.Action <> TreeViewAction.Unknown Then
CheckAllChildNodes(e.Node,e.Node.Checked)
'选中父节点
Dim bol As Boolean = True
If Not e.Node.Parent Is Nothing Then
Dim i As Integer
For i = 0 To e.Node.Parent.Nodes.Count- 1 Step i + 1
If Not e.Node.Parent.Nodes(i).Checked Then
bol = False
End If
Next
e.Node.Parent.Checked = bol
End If
End If
End Sub
'选中子节点
Public Sub CheckAllChildNodes(ByVal treeNode As TreeNode, ByVal nodeChecked As Boolean)
Dim node As TreeNode
For Each node In treeNode.Nodes
node.Checked = nodeChecked
If node.Nodes.Count > 0 Then
Me.CheckAllChildNodes(node, nodeChecked)
End If
Next
End Sub
补充问题
1.如果你只是想让对方观看你的编程效果,而不允许对方修改程序,那么你可以用“菜单→外接程序→加载 打包向导(外接程序对话框中的最后一行即是)→按向导步骤进行”将程序打包,自动生成.exe文件,然后将.exe文件发给对方即可。
2.如果你需要让对方也可对程序进行编辑,那么你需要将这个工程程序全部发给他。可以用.RAR.
希望对你能有所帮助。GOOD LUCK.
VB2005中树控件的一点使用方法
1、如何实现当子节点全部选中/取消,则父节点选中/取消
2、如何实现当父节点选中/取消,则子节点全部选中/取消
Private Sub treeView1_AfterCheck(ByVal sender As Object, ByVal e As System.Windows.Forms.TreeViewEventArgs)
If e.Action <> TreeViewAction.Unknown Then
CheckAllChildNodes(e.Node,e.Node.Checked)
'选中父节点
Dim bol As Boolean = True
If Not e.Node.Parent Is Nothing Then
Dim i As Integer
For i = 0 To e.Node.Parent.Nodes.Count- 1 Step i + 1
If Not e.Node.Parent.Nodes(i).Checked Then
bol = False
End If
Next
e.Node.Parent.Checked = bol
End If
End If
End Sub
'选中子节点
Public Sub CheckAllChildNodes(ByVal treeNode As TreeNode, ByVal nodeChecked As Boolean)
Dim node As TreeNode
For Each node In treeNode.Nodes
node.Checked = nodeChecked
If node.Nodes.Count > 0 Then
Me.CheckAllChildNodes(node, nodeChecked)
End If
Next
End Sub
补充问题
1.如果你只是想让对方观看你的编程效果,而不允许对方修改程序,那么你可以用“菜单→外接程序→加载 打包向导(外接程序对话框中的最后一行即是)→按向导步骤进行”将程序打包,自动生成.exe文件,然后将.exe文件发给对方即可。
2.如果你需要让对方也可对程序进行编辑,那么你需要将这个工程程序全部发给他。可以用.RAR.
希望对你能有所帮助。GOOD LUCK.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
AiPPT
2024-09-19 广告
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询