vb6.0 TreeView1 子节点怎样保存到数据库1.mdb里

vb6.0 TreeView1 子节点怎样保存到数据库1.mdb里

ok

tvtreeview.nodes.add [父级键值 可选], [加入方式 可选], key值, text值, 图片显示[图片的index], 被选中时的图片显示[图片的index] 在实际开发中，许多人不喜欢使用treeview，主要是由于默认的treeview是“只读”的，不支持添加、删除、编辑、调整节点位置等操作。本文通过一个tvedit工程说明如何解决这些问题。 treeview是最灵活的windows控件之一，它以分层的形式显示数据，允许用户随意扩展或折叠节点。鉴于实际生活中许多事物有着层次关系，如计算机里的文件夹、人事组织关系、地区从属关系等，treeview的应用也极其广泛。但在实际开发中，许多人不喜欢使用treeview，主要是由于默认的treeview是“只读”的，不支持添加、删除、编辑、调整节点位置等操作。本文将通过一个tvedit工程说明如何解决这些问题。 tvedit工程（图一）允许在运行时生成节点数据、编辑节点标签、通过拖放操作改变节点的位置，以及将treeview的数据保存到xml文件或从xml文件读取。 图一 一、规划键击事件 修改用户界面控件的默认行为不仅要考虑到用户如何通过鼠标访问新的控件功能，而且还要允许用户使用键盘操作。treeview默认支持下列键击事件： ▲ 上下两个箭头键移动光标（变换当前被选中的节点）。 ▲ 左右箭头键除了变换当前被选中的节点之外，兼具扩展/折叠节点功能。 ▲ enter键扩展或折叠节点。 tvedit工程不改变这些默认的键击行为。但由于treeview默认的键击事件不允许用户编辑其内容，所以我们要另外添加几个事件： ▲ 按insert键在当前选中的节点之下插入一个新的节点。如果要添加一个新的根节点，按ctrl+insert键。用户按下insert键之后，控件自动进入编辑状态，再按enter键可退出编辑状态，控件自动选中父节点，以便用户只需按一下insert键就可以在同一父节点之下插入新节点。 ▲ 按space键（或鼠标停留较长时间）使当前选中的节点进入编辑状态（也许有的人更乐意用enter键进入编辑状态，但treeview控件已经定义了enter键的默认行为，所以这里不再用它）。 ▲ 按delete键删除当前选中的节点。如果被删除的节点包含子节点，所有子节点也被同时删除。 ▲ 用鼠标拖放节点可改变节点在treeview分层结构中的位置。如果被拖动的节点包含子节点，所有子节点也将被移动。 二、设计事件的句柄 在tvedit工程中，treeview控件的keydown事件句柄处理所有涉及键击的编辑操作，它用一个select case块判断用户按下的键，每一个case语句对应一个键击事件。 当用户按下space键，我们调用startlabeledit方法将节点转入编辑模式。如果被按下的是delete键，则调用treeview.nodes集合的remove方法删除当前选中的节点。对于insert键，则用下面的代码在当前选中的节点下添加一个新节点，使新节点处于编辑模式： set currnode = smarttreeview.nodes.add (smarttreeview.selecteditem, tvwchild) currnode.text = "" smarttreeview.startlabeledit 如果用户按下了ctrl+insert键，通过下面的代码添加一个新的根节点并让它处于编辑状态： if shift and vbctrlmask then set currnode = smarttreeview.nodes.add() currnode.selected = true smarttreeview.startlabeledit end if 每一个节点必须有一个键——字符串形式的标识符。对于新添加的或编辑过的节点，我们在编辑操作结束时生成一个1到10000000之间的随机数字，加上前缀“k”，以此作为节点的键。由于rnd()函数不保证随机数字的唯一性，所以我们使用了一个循环，如果