方法如下:
1、安装完成后,双击易语言图标打开易语言。这里d出了一个对话框。
2、双击中间的“windows窗口猛好州程序”新建一个程序。界面如图所示。
菜单栏:程序的各种 *** 作及设置。
窗口编辑区:绘制界面
属性设置区:设置组件、窗口的各种属性
组件框:选择各种组件
提示区:显示当前程序的运行、编译情况。显示对于某一命令的帮助提示。
3、在右侧组件框找到“标签”组件 选择后在界枝蔽面上拖动,松开鼠标,就画出了一个标签。
4、在左侧属性栏找到“标题”属性,修改为“我的第一个程序”并敲下回车。标签的标题就更改了
5、接下来用同样的方法创建一个袜瞎编辑框和一个按钮。
打出如图中的代码。或者复制以下。
.版本 2
编辑框1.内容 = “你好,世界”
信息框 (“我的第一个易语言程序”, 0, )
6、双击按钮进入代码编辑页面。把输入法调为英文状态。
打出如图中的代码。或者复制以下。
.版本 2
编辑框1.内容 = “你好,世界”
信息框 (“我的第一个易语言程序”, 0, )
7、点击上方三角按钮,或者单击F5运行程序查看效果。效果如图所示
8、点击按钮。d出了一个信息框,编辑框的标题也变为了“你好,世界”我们的第一个易语言程序制作完成!
.版本 2
.支持库 iext
.程序集 窗口程序集1
.程序集变量 姓名, 文本型
.程序集变量 记录, 整数型
.子程序 __启动窗口_创建完毕
按钮1.标题 = “显示”
按钮2.标题 = “查找”
标签1.标题 = “姓名”
标签2.标题 = “姓别”
列表.整行选择 = 真
.如果真 (文件是否存在 (取运行目录 () + “\名单.edb”) = 假)
按钮2.标题 = “加入”
创建名单数据库 ()
.如果真结束
打开 (取运行目录 () + “\名单.edb”, “md”, , , , , )
.子程序 创建名单数据库, 逻辑型
.局部变量 字段, 字段信息, , "2"
字段 [1].名称 = “姓名”
字段 [1].类型 = #文本型
字段 [1].最大文本长度 = 8
字段 [2].名称 = “姓别”
字段 [2].类型 = #文本型
字段 [2].最大文本长度 = 2
创建 (取运行目录 () + “\名单.edb”, 字段)
返回 (真)
.子程序 _按钮2_被单击
.如果真 (按钮2.标题 = “查找”)
到首记录 ()
姓名 = “”
.计次循环首 (取记录数 (), 记录)
.如果真 (读 (“姓名”) = 编辑框1.内容)
姓名 = 编辑框1.内容
编辑框2.内容 = 读 (“姓别”)
跳出循环 ()
.如果真结束
跳过 ()
.计次循毕举哪环尾 ()
.如果真 (姓名 = “”)
.如果真 (信息框 (“数据库中查找不到该名字,是否加入人员!”, 4, “提示”) = 5)
.如果 (信息框 (“姓别是<男>吗?”, 4, “确认”) = 5)
编辑框2.内容 = “男”
.否则
编辑框2.内容 = “女”
.如果结束
按钮2.标题 = “加入”
_按钮2_被单击 ()
.如果真结束
返回 ()
.如果真结束
.如手码果真 (信息框 (“是否删除该名字?”, 4, ) = 5)
按钮1.标题 = “删除”
删除名字 ()
.如果真结束
返回 ()
.如果真结束
.如果真 (编辑框2.内容 ≠ “男” 且 编辑框2.内容 ≠ “女”)
信息框 (“姓别输入错误!”, 0, )
编辑框2.获取焦点 ()
返回 ()
.如果真结束
加记录 (编辑框1.内容, 编辑框2.内容)
读数据库 ()
.子程序 _按钮1_被单击
.如果真 (按钮1.标题 = “删除”)
删除名字 ()
信息框 (“姓名:” + 编辑框1.内容 + “ 已删除”, 0, )
.如果真结束
读数据库 ()
.子程序 删除名字, 逻辑型
跳到 (记录)
删除 ()
彻底删除 ()
返回 (真)
.子程序 _列表_左键单击表项
编辑框1.内容 = 列表.取标题 (列表.现行选中项, 0)
编辑框2.内容 = 列表.取标题 (列表.现行选中项, 1)
记录 = 列表.取表项数值 (列表.现行选中项)
按钮1.标题 = “删除”
.子程序 读数据库答派
编辑框1.内容 = “”
编辑框2.内容 = “”
列表.全部删除 ()
到首记录 ()
.循环判断首 ()
记录 = 列表.插入表项 (, , , , , )
列表.置标题 (记录, 0, 读 (“姓名”))
列表.置标题 (记录, 1, 读 (“姓别”))
列表.置表项数值 (记录, 记录 + 1)
跳过 ()
.循环判断尾 (尾记录后 () = 假)
.子程序 _列表_右键单击表项
按钮1.标题 = “显示”
按钮2.标题 = “查找”
读数据库 ()
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)