一个关于treeview超级有意思得问题,请专家们给我一个建议,谢谢! 已经把数据添加到treeview里面了,想实现点击一个按钮,treeview 从第一个节点自动点击移动到最后一个节点。请高手给解决方案。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Sub Command1_Click()Dim Tmp As StringTmp = TreeView1.Nodes(TreeView1.Nodes.Count).TextTreeView1.Nodes(TreeView1.Nodes.Count).Text = TreeView1.Nodes(1).TextTreeView1.Nodes(1).Text = TmpEnd SubPrivate Sub Form_Load()TreeView1.Nodes.Add , , "A", "AAA"TreeView1.Nodes.Add , , "B", "BBB"TreeView1.Nodes.Add "A", tvwChild, "C", "CCC"TreeView1.Nodes.Add "A", tvwChild, "D", "DDD"TreeView1.Nodes.Add "A", tvwChild, "E", "EEE"TreeView1.Nodes(1).Expanded = TrueEnd Sub只是把TEXT是属性改变了,不知道是不是楼主想要的 如何解决多人同时使用sql? 求如何返回到框架的问题 两个数据库联接 急!!! DATACOMBO的简单问题!!! 高手请看看这个问题:ado中执行insert into sql语句后返回的是设么纪录集? VB中可以实现程序的运行结果是添加line和shape控件吗? 如何计算mapinfo图元的面积 关于介绍世界各国货币的单位及换算相关的站点 请问一条SQL语句。 RichTextBox在那个部件里? vb中怎么用modem建立连接 list表字体样式显示问题
Private Sub Command1_Click()
Dim Tmp As String
Tmp = TreeView1.Nodes(TreeView1.Nodes.Count).Text
TreeView1.Nodes(TreeView1.Nodes.Count).Text = TreeView1.Nodes(1).Text
TreeView1.Nodes(1).Text = TmpEnd SubPrivate Sub Form_Load()
TreeView1.Nodes.Add , , "A", "AAA"
TreeView1.Nodes.Add , , "B", "BBB"
TreeView1.Nodes.Add "A", tvwChild, "C", "CCC"
TreeView1.Nodes.Add "A", tvwChild, "D", "DDD"
TreeView1.Nodes.Add "A", tvwChild, "E", "EEE"TreeView1.Nodes(1).Expanded = True
End Sub
只是把TEXT是属性改变了,不知道是不是楼主想要的