树(TreeView1)的双击事件? 在程序中怎么通过双击父节点触发另一个事件,通过双击子节点触发一个事件 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以用Case,再判断treeview.SelectedItem.Index或者Key 比如说你创建了两个父节点和两个子节点Private Sub Form_Load()On Error GoTo errindex = 1TreeView1.Nodes.Add , tvwLast, , "顶节点1", 1TreeView1.Nodes.Add , tvwLast, , "顶节点2", 1End SubPrivate Sub TreeView1_Click() '点击TreeView时发生index = TreeView1.SelectedItem.index '得到你所选中的节点End SubPrivate Sub Command2_Click() '在你所点击的Node下新增分节点On Error GoTo errTreeView1.Nodes.Add index, tvwChild, , "分节点", 1 '增加顶节点Exit Suberr:TreeView1.Nodes.Add , tvwLast, , "顶节点 ", 1 '增加顶节点End Sub'当你DblClick时,可以判断index的值select case indexcase 1 '顶节点1case 2 '顶节点2case 3 '顶节点1下的分节点case 4 '顶节点2下的分节点end select最好用Key来判断。因为Key是唯一的。QQ:553774891 VB交友~~ 串口通讯 如何发送ctrl+break VB可以将对象存入SQL数据库吗? 多用户软件开发需要注意什么? 我不想要text控件的光标该怎样设置啊? 三层结构的疑问 VB的临时文件如何指定生成位置 在webBrowser里,我点击某个超连接,如何得到我点击连接的文本内容啊?? MSHFlexGrid一问 资源管理器的做法 请问模块和模块之间如何参数传递调用?太不好意思了,vb学的不好 怎样用循环语句!菜鸟急求 模式与非模式
Private Sub Form_Load()
On Error GoTo err
index = 1
TreeView1.Nodes.Add , tvwLast, , "顶节点1", 1
TreeView1.Nodes.Add , tvwLast, , "顶节点2", 1
End SubPrivate Sub TreeView1_Click() '点击TreeView时发生
index = TreeView1.SelectedItem.index '得到你所选中的节点
End SubPrivate Sub Command2_Click() '在你所点击的Node下新增分节点
On Error GoTo err
TreeView1.Nodes.Add index, tvwChild, , "分节点", 1 '增加顶节点
Exit Sub
err:
TreeView1.Nodes.Add , tvwLast, , "顶节点 ", 1 '增加顶节点
End Sub'当你DblClick时,可以判断index的值
select case index
case 1 '顶节点1case 2 '顶节点2case 3 '顶节点1下的分节点case 4 '顶节点2下的分节点end select最好用Key来判断。因为Key是唯一的。
QQ:553774891 VB交友~~