版本2
支持库iext
程序集窗口程序集1
程序集变量帐号,文本型
程序集变量密码,文本型
子程序__启动窗口_创建完毕
超级列表框1.插入表项(,“1”,,,,)
超级列表框1.置标题(0,1,“abcsdfsdfsdfs”)
超级列表框1.置标题(0,2,“123”)
超级列表框1.插入表项(,“2”,,,,)
超级列表框1.置标题(1,1,“ccc”)
超级列表框1.置标题(1,2,“234”)
子程序_按钮1_被单击
局部变量表项,整数型,,"6"
表项=超级列表框1.取被选择表项()
帐号=超级列表框1.取标题(表项[1],1)
密码=超级列表框1.取标题(表项[1],2)
写出文本(打开文件(取当前目录()+“a.txt”,5,),帐号+“|”+密码)
信息框(“成功写出数据!”,0,)
这里读出账号、密码并写出文本文件,必须在列表中鼠标单击选择一行数据
子程序_按钮2_被单击
局部变量文本,文本型,,"2"
局部变量字符数,整数型
局部变量a,整数型
文本=分割文本(读入一行(打开文件(取当前目录()+“a.txt”,1,)),“|”,)
帐号=文本[1]
密码=文本[2]
字符数=取文本长度(帐号)
编辑框1.内容=“”
计次循环首(字符数,a)
编辑框1.内容=编辑框1.内容+取文本中间(帐号,a,1)
编辑框1.刷新显示()
延时(500)
计次循环尾()
延时(1000)
字符数=取文本长度(密码)
编辑框2.获取焦点()
计次循环首(字符数,a)
编辑框2.内容=编辑框2.内容+取文本中间(密码,a,1)
编辑框2.刷新显示()
延时(500)
计次循环尾()
扩展资料
易语言的特点
开发效率极高的易语言可以在短期内开发出一套实用的软件系统来。要论到系统的稳定程度,虽然比不过java和C++,但是,对于中小型软件来说,易语言还是很稳的。
而且,易语言可以与汇编语言一起配合着开发,如果你的编程能力够高,可以完全脱离易语言,用易语言的IDE调用纯API来进行项目开发。
参考资料来源:百度百科—易语言
1、首先,运行易语言,然后选择“Windows窗口程序”并点击“确定”按钮,进入“Windows窗口程序”设计界面。
2、在窗口上绘制超级列表框组件,今天我们做一个小程序,就是往超级列表框中,添加信息,类似学生信息数据表。
3、修改相关组件的标题和其他属性,规范命名各组件的名称,以方便后续的代码编写。
4、正式进入代码编写。
5、代码编写完毕,猛戳F5键运行程序。点击相应按钮,搜索超级列表框里的内容。
.版本 2
.支持库 iext
.子程序 _按钮1_被单击
.局部变量 Seek, 整数型
.局部变量 i, 整数型
.计次循环首 (超级列表框1.取列数 (), i)
Seek = 超级列表框1.查找表项 (编辑框1.内容, , , i - 1) ' 2表示超级列表框的第三列
.如果真 (Seek ≠ -1)
跳出循环 ()
.如果真结束
.计次循环尾 ()
.如果 (Seek = -1)
信息框 (“找不到!”, 0, )
.否则
超级列表框1.获取焦点 ()
超级列表框1.选择表项 (Seek)
.如果结束
循环列查找
.版本 2
.支持库 iext
.子程序 __启动窗口_创建完毕
超级列表框1.整行选择 = 真
超级列表框1.始终显示选择项 = 真
.子程序 _按钮1_被单击
.局部变量 Seek, 整数型
Seek = 超级列表框1.查找表项 (编辑框1.内容, , , 2) ' 2表示超级列表框的第三列
.如果 (Seek = -1)
信息框 (“找不到!”, 0, )
.否则
超级列表框1.获取焦点 ()
超级列表框1.选择表项 (Seek)