’假设库文件名为“产品数据库.mdb”,库中的表名为“产品表”,产品字段名“类别”
全局变量:a 文本型
如果真(数据库连接1.连接Access(取运行目录()+“\产品数据库.mdb”,“”)=假)
信息框(“连接数据库失败!”,0,)
返回()
’添加一个记录集控件;
记录集1.置连接(数据库连接1)
‘上面我们已经打开并且连接好了MDB数据库,接下来我们做读取和显示;
记录集1.打开(“select * from 产品表”,#SQL语句,#服务器端游标)
记录集1.到首记录()
判断循环首(记录集1.尾记录后=假)
记录集1.读文本(“类别”,a)
如果真(a=“日用品”)
如果真(a=“洗化用品”)
树型框1.加入项目(1,a,,,,,)
如果真(a=“洗发水” 或 a=“洗衣粉”)
树型框1.加入项目(2,a,,,,,)
记录集1.到下一条()
判断循环尾()
记录集1.关闭()
这就得看的帮助文件了你在索引那里打上“树形框”然后看看“树形框”有什么可 *** 作的指令你要改变图片,那么就得找和图片有关系的指令关于读取配置项~也可以看帮助文件但是我认为没必要用到配置项你弄个数据库会比较好点易语言树型框全 *** 作源码例程程序结合易语言扩展界面支持库,针对树型框的完全 *** 作,支持设置树型框各种属性;动态添加、修改、删除项目;取得某一项目下所有子项目;树型框项目任意移动。本易语言源码例程属于易语言初级进阶教程。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)