- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]组合框 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97110)
-- 发布时间：2017/3/6 13:51:00
-- [求助]组合框
老师，组合框下拉链名称集合目录树节点名称，按组合框下拉链名称定位目录树节点
-- 发布时间：2017/3/6 14:33:00
--
没看懂，上图，上例子
-- 发布时间：2017/3/6 16:36:00
--
此主题相关图片如下：图像 1.png
-- 发布时间：2017/3/6 16:49:00
--
循环每一个节点
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim str As String = "税收"
For Each nd As WinForm.TreeNode In trv.AllNodes
If nd.Text = str Then
trv.SelectedNode = nd
Exit For
End If
Next
-- 发布时间：2017/3/6 17:24:00
--
老师，有点不理解。
-- 发布时间：2017/3/6 17:32:00
--
1、不理解，重新学一次foxtable，你根本一点代码都没看懂过。
2、不想学那就上传具体实例
-- 发布时间：2017/3/6 19:55:00
--
老师，窗口1组合框求定位。
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:定位.rar |
-- 发布时间：2017/3/6 20:50:00
--
TextChanged事件
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim str As String = e.Sender.Text
For Each nd As WinForm.TreeNode In trv.AllNodes
If nd.Text = str Then
trv.SelectedNode = nd
Exit For
End If
Next
-- 发布时间：2017/3/6 21:09:00
--
老师，怎样在下拉链框控件中显示目录树所有的节点。
-- 发布时间：2017/3/6 21:30:00
--
Dim cbo As WinForm.ComboBox = e.Form.Controls("ComboBox1")
cbo.ComboList = DataTables("进销存").GetComboListString("材料名称") & "|" & DataTables("进销存").GetComboListString("摘要")