如果你用的易语言自己开发的数据库 (edb) 那么你首先要新建一个数据库结构! 你可以设置成2个数据的结构类型 然后保存 好 接下来你要写代码 用到的是 写记录(编辑框1的内容,辑框2的内容) 需要你先打开数据库 具体 *** 作方法你百度吧!!
版本 2
支持库 eExcel2000
Excel工作簿1置程序 (Excel程序1) ' 设置工作簿于excel程序领导之下
Excel工作簿1打开 (取当前目录 () + “\” + 年级数 + “xls”) ' 本来可以加个文件名的,如果没有文件,则另存为吧
Excel工作簿1表格序号 = 1 ' 设置第一张表为工作表
Excel程序1显示 = 真
' 以下是把数据库中的查询结果放入excel程序里
tempnum = 1 ' 第一条记录
tempnumtext = 到文本 (tempnum)
外部数据库1到首记录 (记录集句柄1)
判断循环首 (外部数据库1尾记录后 (记录集句柄1) = 假) ' 是不是已经到了尾记录了如果不是,继续
变量循环首 (1, 33, 1, loopnum) ' 共有33个字段,每行显示33段,在excel表中表示列tempnum表示为行
Excel工作簿1首单元格 = 表列数组 [loopnum] + tempnumtext
Excel工作簿1尾单元格 = 表列数组 [loopnum] + tempnumtext
Excel工作簿1内容格式 = “@” ' 这代表是文本型的数据本行可读可写,你可以先设置好格式,然后读一下,显示是什么,再设置
Excel工作簿1内容 = 外部数据库1读 (记录集句柄1, loopnum)
变量循环尾 ()
外部数据库1到后一记录 (记录集句柄1)
tempnum = tempnum + 1
tempnumtext = 到文本 (tempnum)
判断循环尾 ()
' Excel工作簿1保存 (取当前目录 () + “\” + 年级数 + “xls”)
' Excel工作簿1关闭 ()
' Excel程序1退出 ()
版本 2
支持库 iext
超级列表框1全部删除 ()
判断循环首 (尾记录后 () ≠ 真)
' 记录数 = 记录数 + 1
用户 = 读 (#姓名)
性别 = 读 (#性别)
家庭住址 = 读 (#家庭住址)
身份z = 读 (#身份z)
个人简介 = 读 (#个人简介)
判断开始 (用户 = 编辑框1内容 或 性别 = 编辑框1内容 或 家庭住址 = 编辑框1内容 或 到文本 (身份z) = 编辑框1内容 或 个人简介 = 编辑框1内容)
超级列表框1插入表项 (0, 用户, , , , )
超级列表框1置标题 (0, 1, 性别)
超级列表框1置标题 (0, 2, 家庭住址)
超级列表框1置标题 (0, 3, 到文本 (身份z))
超级列表框1置标题 (0, 4, 个人简介)
默认
判断结束
跳过 (1)
' 信息框 (用户 + 性别 + 家庭住址 + 到文本 (身份z) + 个人简介, 0, )
判断循环尾 ()
到首记录 ()
这是个简单的数据库信息查找代码片段,完整的代码请下载 有你要的功能
如果是易语言自带的数据库那就简单了。
判断(打开(“\数据库名edb”,,,,))
到首记录()
计次循环首(取记录数(),x)
判断(读("性别“)=”男“)
c=超级列表框插入表项(,,,,,)
超级列表框置标题(c,0,读(“姓名”))
超级列表框置标题(c,1,读(“班级”))
超级列表框置标题(c,2,读(“年龄”))
跳过()
计次循环尾()
易语言的数据库的话:
例如
跳到(1)
‘从数据库首开始
判断(查找(读(#账号)=编辑框1内容))
’查找账号是否存在
|__|__判断(读字段(#密码)=编辑框2内容)
|
|___
信息框(“登陆成功!”)‘查找到账号后,数据库指针停止在
|
该记录。所以可以用读字段读取账号对应的密码。。看看
|
用户输入的密码是否正确
|
|
|
____信息框(“没有该账号”)
ACCESS又是另一种方法我就不写出来了
以上就是关于易语言数据库怎么写查找和修改的2个功能全部的内容,包括:易语言数据库怎么写查找和修改的2个功能、易语言如何查询excel数据库、请问易语言数据库搜索问题等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)