易语言开发银行流水生成器,分享源码仅供学习

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

小编我是做技术开发的,易语言的话学了将近有10年左右,然后看网上很多人都在找这个玩意,然后就是有一个人卖9000多,感觉那种人就是向前想疯了,我分析了一下它的软件源码,也就是辅助生成数据,并不是一键它会生成文档,就是给你按参数生成固定的数据,然后需要你自己复制粘贴,这个原理的实现真的挺简单的,我用易语言模仿了一下它的软件原理和功能,然后软件的代码我这边分享过来了,大家可以自己学习去,仅供娱乐哈。

.版本 2
.支持库 spec

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

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

置剪辑板文本 (编辑框1.内容)
_启动窗口.标题 = “复制成功”
延迟 (1000)
_启动窗口.标题 = “...”

.子程序 _按钮2_被单击
.局部变量 当前数, 文本型

当前数 = 编辑框6.内容
变量1 = 到整数 (编辑框6.内容)

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

变量1 = 变量1 + 1


调试输出 (变量1)
编辑框1.加入文本 (编辑框4.内容 + “年-” + 编辑框5.内容 + “月-” + 到文本 (变量1) + “号” + #换行符)




.子程序 _标签3_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型



.子程序 _标签4_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型



.子程序 _按钮4_被单击
.局部变量 a, 整数型
.局部变量 最小值, 整数型
.局部变量 最大值, 整数型
.局部变量 取随机, 整数型
.局部变量 b, 整数型
.局部变量 生成的余额, 文本型, , "0"

.计次循环首 (到整数 (编辑框2.内容), a)
    最小值 = 到整数 (编辑框3.内容) ÷ 到整数 (编辑框2.内容) - 500
    最大值 = 到整数 (编辑框3.内容) ÷ 到整数 (编辑框2.内容)
    取随机 = 取随机数 (最小值, 最大值)
    编辑框1.加入文本 (到文本 (取随机) + “.00” + #换行符)
    加入成员 (生成的余额, 到文本 (取随机))

.计次循环尾 ()
编辑框1.加入文本 (“-----------以下为余额” + #换行符)

.计次循环首 (取数组成员数 (生成的余额), b)
    编辑框1.加入文本 (到文本 (到整数 (编辑框3.内容) - 到整数 (生成的余额 [b])) + “.00” + #换行符)


.计次循环尾 ()




.子程序 _按钮5_被单击
.局部变量 a, 整数型

.计次循环首 (到整数 (编辑框2.内容), a)
    编辑框1.加入文本 (编辑框7.内容 + 文本_取随机数字 (到整数 (编辑框8.内容)) + #换行符)
.计次循环尾 ()


.子程序 _按钮6_被单击
.局部变量 a, 整数型

.计次循环首 (到整数 (编辑框2.内容), a)
    编辑框1.加入文本 (编辑框9.内容 + #换行符)

.计次循环尾 ()



.子程序 _按钮7_被单击
.局部变量 数据, 文本型, , "0"
.局部变量 a, 整数型

数据 = 分割文本 (#常量2, “#”, )
.计次循环首 (到整数 (编辑框2.内容), a)
    编辑框1.加入文本 (数据 [取随机数 (1, 取数组成员数 (数据))] + #换行符)

.计次循环尾 ()


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

信息框 (文本_取行数 (编辑框1.内容), 0, , )

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



.子程序 _按钮10_被单击
.局部变量 收支, 文本型
.局部变量 a, 整数型
.局部变量 数据, 文本型, , "0"

数据 = 分割文本 (#常量3, “#”, )

.计次循环首 (到整数 (编辑框2.内容), a)
    编辑框1.加入文本 (数据 [取随机数 (1, 取数组成员数 (数据))] + #换行符)

.计次循环尾 ()


.子程序 _按钮11_被单击
.局部变量 收支, 文本型
.局部变量 a, 整数型
.局部变量 数据, 文本型, , "0"

数据 = 分割文本 (#常量5, #换行符, )

.计次循环首 (到整数 (编辑框2.内容), a)
    编辑框1.加入文本 (编辑框10.内容 + 数据 [取随机数 (1, 取数组成员数 (数据))] + #换行符)

.计次循环尾 ()