- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 窗口目录树绑定 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=26052)
-- 发布时间：2012/11/23 10:14:00
-- 窗口目录树绑定
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目5.zip |
此主题相关图片如下：qq截图20121123100852.png
2012年(春)、2012年(秋)、班级和姓名要表中生存。代码应该怎样写？
请高手指点。
[此贴子已经被作者于2012-11-23 10:22:04编辑过]
-- 发布时间：2012/11/23 10:53:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目5.foxdb |
http://www.foxtable.com/help/topics/0894.htm
http://www.foxtable.com/help/topics/1970.htm
[此贴子已经被作者于2012-11-23 10:54:41编辑过]
-- 发布时间：2012/11/23 11:06:00
--
谢谢！我是想像这样样子。
此主题相关图片如下：qq截图20121123110341.png
-- 发布时间：2012/11/23 11:14:00
--
此主题相关图片如下：qq截图20121123110741.png
或者，自己用代码设置一下。
http://www.foxtable.com/help/topics/0901.htm
-- 发布时间：2012/11/23 11:30:00
--
代码该怎样写？请指点。
-- 发布时间：2012/11/23 11:52:00
--
比如
Dim tr As WinForm.TreeView
tr = Forms("窗口1").Controls("TreeView1")
For Each node As Object In tr.AllNodes
Select Case Node.Level
Case 0
node.Ico nFile = "C:\\1.ico"
Case 1
node.Ico nFile = "C:\\2.ico"
Case 2
node.Ico nFile = "C:\\3.ico"
End Select
Next
[此贴子已经被作者于2012-11-23 11:54:17编辑过]