社区
VB基础类
帖子详情
高分征解:如何使用TreeView
wbt
2000-07-14 03:12:00
使用以下语句时,第一句出现”语句未结束”
第二句出现“元素找不到”
dim MyNode as Node
MyNode.Add "Node1",1
...全文
203
7
打赏
收藏
高分征解:如何使用TreeView
使用以下语句时,第一句出现”语句未结束” 第二句出现“元素找不到” dim MyNode as Node MyNode.Add "Node1",1
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
oldcowboy
2000-07-20
打赏
举报
回复
第一个加入的节点应该index = 0;
dim MyNode as Node
MyNode.Add "Node1",0
是有严格顺序的。
estone
2000-07-19
打赏
举报
回复
看一下msdn不就知道了。
Tyro
2000-07-17
打赏
举报
回复
你应该这样写:
dim MyNode as Node
set MyNode = treeview1.nodes.add ,,,"Node1",1
蝈蝈俊
2000-07-17
打赏
举报
回复
这是vb的问题吧,不是asp的问题。我给你转到vb中了
Un1
2000-07-17
打赏
举报
回复
Script只能有 variant ,不能as node
TopHead
2000-07-14
打赏
举报
回复
你在ASP中是吗?
给你一段代码:
<%
a=Server.CreateObject("ADODB.Connection")
a.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=NDJ;Data Source=(local)"
set cnn=Server.CreateObject("ADODB.Connection")
set rst=Server.CreateObject("ADODB.Recordset")
cnn.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=NDJ;Data Source=(local)"
level = 0
Response.Write "<script language=vbscript>"+chr(13)+chr(10)
Response.Write "Sub window_onload()"+chr(13)+chr(10)
Do
bln = True
rst.Open "Select * From Account1 Where 级次=" & level, cnn
Do Until rst.EOF
bln = False
If level = 0 Then
Response.Write "Set nodX = TreeView1.Nodes.Add(, , ""R" & cstr(rst("ID")) & """,""" & cstr(rst("编码") & "-" & rst("名称")) & """)"+chr(13)+chr(10)
Else
Response.Write "Set nodX = TreeView1.Nodes.Add(""R" & cstr(rst("上级ID")) & """, 4, ""R" & cstr(rst("ID")) & """,""" & cstr(rst("编码") & "-" & rst("名称")) & """)"+chr(13)+chr(10)
End If
rst.MoveNext
Loop
rst.Close
level = level + 1
Loop Until bln
Response.Write "End Sub"+chr(13)+chr(10)
Response.Write "</script>"+chr(13)+chr(10)
cnn.Close
%>
schunter
2000-07-14
打赏
举报
回复
你应该这样写:
dim MyNode as Node
set MyNode = treeview1.nodes.add "Node1",1
Node对象没有Add属性,只有Nodes对象才有Add属性。
500个世界著名数学
征解
问题-冯贝叶
500个世界著名数学
征解
问题-冯贝叶。。。。。。。。。。。。。
国际数学问题
征解
.pdf
国际数学问题
征解
.pdf
会计制度——农业税收
征解
会计制度.doc
会计制度——农业税收
征解
会计制度.doc
会计制度农业税收
征解
会计制度(制度范本、DOC格式).doc
会计制度农业税收
征解
会计制度(制度范本、DOC格式).doc
粘弹性厚壁筒问题的辛本
征解
方法 (2007年)
将哈密顿体系引进到粘弹性力学厚壁筒问题中,在辛体系下重新描述了基本问题,即建立了正则方程组。借助于积分变换,得到了拉伸、扭转和弯曲等问题的解以及有边界局部效应的解。将原问题归结为辛几何空间中的零本征值本
征解
和非零本征值本
征解
问题,从而建立了一种有效的分析问题方法和数值方法。为解决同类问题提供了一条可行的路径。
VB基础类
7,763
社区成员
197,609
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章