自学vb.net,遇到理解不了的难题(treeview),来求助大家了,谢谢~~

问题描述

大家好,本来不懂编程,由于工作的需要,所以自己上网找了很多代码做参考尝试的做软件用大多数功能所涉及到的控件、代码,理解或者生搬硬套的,勉强算是完成了现在遇到了一个各实在理解不上去的地方,害羞的码文来这里找高手们求助啦~~~嘿嘿,希望能得到大家的支持需要treeview控件,从数据库载入数据论坛里大家说要用“递归”,不看懂,不会改,基本的概念一点没有我要做一个类似这样的数据库是这样的[表xinxi]:[id][upid][name][xinxi1][xinxi2]将[表xinxi]注入到treeview中选择好需要的[name]后,双击treeview相应的[xinxi1]和[xinxi2]会进入到textbox1和textbox2里面点击保存,加上两个textbox的数据一起保存进另一个表格这是我在论坛里找到的代码:DimconnAsOleDbConnectionConnStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=D:a.mdb;JetOLEDB:DataBasepassword=hljmri2007;PersistSecurityInfo=False"DimdaAsOleDbDataAdapterDimdsAsDataSetconn=NewOleDbConnection(ConnStr)'----主体部分----'TryTreeView1.Nodes.Clear()conn.Open()'能加载到TreeView的数据量不会多,一次性全取。''还有你把用到的字段自己列一下,代替*'DimsqlRWListAsString="SELECT*FROMxinxi"DimdaAsNewOleDbDataAdapter(sqlRWList,conn)DimdtRWListAsNewDataTable()da.Fill(dtRWList)dep0SQL="SELECTid,upid,nameFROMxinxiWHEREname='"&loadMAN&"'"'根据登陆人找出项目组''(项目组这行是因为我不会改,所以没有改动)dep0com=NewOleDbCommand(dep0SQL,conn)dep0dr=dep0com.ExecuteReader()Whiledep0dr.Read()'找到项目组后,按项目组把主任务理出来'Dimrows()AsDataRow=dtRWList.Select("RWSID=0andRwtoDep='"&dep0dr.Item("RWGname"))ForEachrowAsDataRowInrowsDimtree_rootAsNewTreeNode()tree_root.Text=row("RWID")&")"&row("RWtitle")'树上显示的是根节点名称'TreeView1.Nodes.Add(tree_root)AddSubNodes(tree_root,row,dtRWList)NextEndWhileCatchexAsExceptionMsgBox(ex.ToString)Finallyconn.Close()EndTryTreeView1.ExpandAll()TreeView1.Select()EndSub

请问,我这种情况需要改动哪里,感觉有一些我这里不需要,比如项目组之类的嘿嘿,谢谢大家帮忙了,我这里等候您的指导~~

解决方案

解决方案二:
怎么说呢,调试一下,一步一步地操作,对你的理解有很大帮助
解决方案三:
先查询出数据库表里的数据放到内存表里datarwlistselectid,name,xinxi1,xinxi2fromxinxi再做个循环,往treeview里插入节点。Dimtree_rootAsNewTreeNode()tree_root.Text=datarwlist.rows.item(i).item(0)&"-"&datarwlist.rows.item(i).item(1)tree_root.tag=datarwlist.rows.item(i).item(2)&"→"&datarwlist.rows.item(i).item(3)点击节点的事件里textbox1和textbox2就直接获取treeview的节点的tag的值。

时间: 2024-10-15 12:33:57

自学vb.net,遇到理解不了的难题(treeview),来求助大家了,谢谢~~的相关文章

vb-关于VB MSCHART控件画柱状折线图的求助

问题描述 关于VB MSCHART控件画柱状折线图的求助 各位大神,小弟求教如何使用VB 中MSCHART控件画出柱状折线图. 例:柱状显示每月实际销量,折线显示销售目标 解决方案 http://wenku.baidu.com/link?url=4dnfuHhQFd_o4Ms3Mybj_C87iVPKPPuz3TAsNVuhQ2q73fnNoFepsKD1ke3Sb2n_e4C2BNW67uwa7aAwGRsArAL_hsVNwyl3lI9VtGdIwGa http://www.docin.co

应用-想自学wpf,c#2010实现的,求推荐一些好教材,谢谢

问题描述 想自学wpf,c#2010实现的,求推荐一些好教材,谢谢 希望注重于技术的应用,即主要是说应用实例,再辅以理论解释.一定是得有充足的实例,光看理论的进度着实太慢.求推荐一些教材,谢谢. 解决方案 个人觉得计算机方面的书籍,老外写的不错,而且大部分有示例代码,比较详实,便于实战.可以看 WPF揭秘,WPF控件开发等 解决方案二: 大学用书 c#程序设计及应用教程 挺多例子,比较注重方法讲解,如果是小白.比较合适

C# Source 与VB Source 的不同

C# Source    Intro2_cs.aspx  1 <%@ Page Language="C#"%> 2 3<html> 4   <head> 5      <link rel="stylesheet"href="intro.css"> 6   </head> 7 8   <body> 910       <center>1112       <f

VB.net2003的问题

问题描述 在下正在自学VB,请教一下各位高手们:1.VB.net中的textbox控件如何限制输入的值,例如:我要这个文本输入框只能输入小于或等于100的值,输入值大于100就提示出"输入值最大为100".2.还是textbox的问题,如何在运行时,文本框里面自动赋于0值,也就是说文本框不输入任何东西的情况下,自动的作为0来运算.请问各位下以上2种代码是如何写的?小弟我先在这里谢过各位高手了. 解决方案 解决方案二:iflen(textbox1.text)>100thenmsgb

关于自学的一些话题

一位准大二学生来信提到了自己在自主地安排自己的学习方面遇到的困惑.大学需要自学,但不少同学的自学安排不好,或者在自学效率低下,甚至有的同学借着自学走向了不学.这是一个非常重要的问题,我决定回封长信讨论信中提及的话题,并且借此文公布我在开出<大学生学习指导>课的一些材料. [学生来信] 贺老师,您好! 最近又看了您在csdn上的文章--<写给大一翘课后悔了的同学>.有一些感触,也有一些问题和反思. 我感觉我在大一上的时候还做得很好,硬是一堂课没翘(必修课和选修课).虽然有时候会在选修

和游戏开发爱好者浅谈“自学”

[来信] 我是在校的大二学生,目前在自学自己感兴趣的领域(PC游戏开发).想请问您认为自学有什么需要注意的地方吗? [回复] 非常抱歉,这样的问题我还是不细答了吧.学习方法每个人都可以不一样的,自学也是这样,范范而谈自学,好像有过这样一个写作计划,待执行,况且不一定适合你.提醒四点:一个是"自",要有自我的主见,内容.方式.信息获取途径等,都可以是个性化的:二是"学",以学习效果为标准安排,在学习的过程中享受进步的愉悦:三要提醒自学不是"独学",

非常急 求解答谢谢-vb程序365转换叁陆伍

问题描述 vb程序365转换叁陆伍 请求帮助 初学者多多关照感激不尽谢谢 解决方案 直接用replace替换就可以 dim s(1 to 10) as string s(1) = "壹" s(2) = "贰" ... dim s1 as string s1 = 365 & "" for i = 1 to 10 s1 = replace(s1, i & "", s(i)) next msgbox s1 解决方案二

c语言-VB 调用crc16校验 dll 返回值不正确

问题描述 VB 调用crc16校验 dll 返回值不正确 真诚求助,其实什么都写好了就是关键时候掉链子了 如下: C语言写的CRC16 半字节查表 方式校验,dll cpp 程序如下: unsigned short _stdcall CalCRC16(unsigned char *ptr, unsigned char len) { unsigned short crc; unsigned char da; unsigned short crc_ta[16]={ 0x0000,0x1021,0x2

vb.net inet控件使用疑问

问题描述 我在vs2012里编程欲添加一个Inet控件,以实现FTP操作,测试一下语句时失败:Inet1.Execute()--提示"没有可访问的"Execute"接受此数目的参数,因此重载决策失败."Inet1.OpenURL("http://www.baidu.com")--提示"没有可访问的"OpenURL"接受此数目的参数,因此重载决策失败."请问该如何解决?如果能教教在vs2012中vb.net里