For i = 1 To TreeView1.Nodes.Count
If TreeView1.Nodes(i).Selected = True Then
Exit For
End If
Next i
If i <= TreeView1.Nodes.Count Then
MsgBox "有节点被选中!"
End If
If TreeView1.Nodes(i).Selected = True Then
Exit For
End If
Next i
If i <= TreeView1.Nodes.Count Then
MsgBox "有节点被选中!"
End If
解决方案 »
- 如何实现,安装前电子注册认证?
- VBA 声明了一个public变量,如何给它赋值?
- vb.net winForm中有一个datagrid 当我把鼠标移动到第3列的时候在鼠标旁边出现一个提示
- 求助一个很简单的设置font size问题,拜托高手们看下
- 求助关于dbf表
- ~_~ sql server数据库的备份和还原,要代码最好啦,先谢谢啦
- 如何在程序运行时动态改变FORM的图标
- combo求助
- crystal report的问题:怎样将两个表格串起来
- 在VB中如何调用SQL存储过程以及将参数传递给存储过程
- 7位数字,怎样截去前3位?
- 有没有高手谈谈VB下的三层应用程序的开发COM+,或者用WINSOCK方式的。
msgbox "nothing selected!"
else
msgbox treeview1.SelectedItem.index & "th Node selected!"
end if