易语言农业银行模拟器电子回执单生成器,分享源码和程序

发布时间 2023-10-27 14:44:11作者: 万花技术

比如朋友之间的装逼娱乐,这个工具挺有用的,我自己学易语言很多年了,要开发这么一个工具轻而易举,而且整个开发下来要不了200行代码,我下面开发的这个工具是农业银行的电子回执单生成器,就是可以生成一个回执单图,里面的参数都可以通过程序修改,开发工具用的是易语言。

先看下界面吧:

 

软件的程序集代码:

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击
.局部变量 图片号, 整数型

标签2.标题 = 编辑框1_收款人姓名.内容
标签3.标题 = 编辑框2_收款账号.内容
标签4.标题 = 编辑框3_收款银行.内容
标签5.标题 = 编辑框4_转账金额.内容
标签6.标题 = 编辑框5_手续费.内容
标签7.标题 = 编辑框6_付款人姓名.内容
标签8.标题 = 编辑框7_付款账号.内容
标签9.标题 = 编辑框8_付款银行.内容
标签10.标题 = 编辑框9_交易时间.内容

写到文件 (取运行目录 () + “\” + 编辑框9_123.内容 + “.png”, 快照 (图片框1.取窗口句柄 (), 图片框1.取用户区宽度 (), 图片框1.取用户区高度 ()))


.子程序 _按钮2_被单击

编辑框2_收款账号.内容 = 文本_取随机数字 (19)


.子程序 _按钮3_被单击
.局部变量 银行, 文本型, , "0"

银行 = 分割文本 (#常量2, “@”, )
编辑框3_收款银行.内容 = 银行 [取随机数 (1, 取数组成员数 (银行))]


.子程序 _按钮4_被单击
.局部变量 时间, 文本型

标签20.标题 = 编辑框9_1.内容


.子程序 _按钮5_被单击

编辑框7_付款账号.内容 = 文本_取随机数字 (19)

.子程序 _按钮6_被单击
.局部变量 银行, 文本型, , "0"

银行 = 分割文本 (#常量2, “@”, )

编辑框8_付款银行.内容 = 银行 [取随机数 (1, 取数组成员数 (银行))]


.子程序 _单选框1_被单击

图片框1.图片 = #图片2

  生成出来的截图效果图: