精易论坛

标题: 进位计算,是否还还有牛逼写法 [打印本页]

作者: KD飞飞    时间: 2025-1-10 12:01
标题: 进位计算,是否还还有牛逼写法
大佬看看我写的,能不能省省,感觉我在脱裤子放屁的那种
虽然能用,但是不优雅
难过

  
子程序名返回值类型公开备 注
序号计算子程序  
变量名类 型静态数组备 注
局_当前数a整数型 
输出内容文本型 
局_表9索引整数型 
计次循环首 (1100, 局_当前数a)
处理事件 ()
如果真 (局_当前数a < 10)
输出内容 = “000”到文本 (局_当前数a)
如果真 (局_当前数a ≥ 10 局_当前数a < 100)
输出内容 = “00”到文本 (局_当前数a)
如果真 (局_当前数a ≥ 100 局_当前数a < 1000)
输出内容 = “0”到文本 (局_当前数a)
如果真 (局_当前数a ≥ 1000)
输出内容 = 到文本 (局_当前数a)
局_表9索引 = 超级列表框9.插入表项 (, , , , , )
超级列表框9.置标题 (局_表9索引, 0, 输出内容)
计次循环尾 ()


i支持库列表   支持库注释   
iext扩展界面支持库一


作者: 小小鱿鱼    时间: 2025-1-10 12:25
格式化文本 (“%04d”, 局_当前数a)
作者: 大漠小鸟    时间: 2025-1-10 12:43
  
子程序名返回值类型公开备 注
序号计算子程序  
参数名类 型参考可空数组备 注
超级列表框超级列表框
变量名类 型静态数组备 注
i整数型 
输出内容文本型 
输出内容 = 取空白文本 (8)
超级列表框.可视 = 假
超级列表框.禁止重画 ()
计次循环首 (1100, i)
sprintf (输出内容, “%04d”, i)
超级列表框.插入表项 (, 输出内容, , , , )
计次循环尾 ()
超级列表框.允许重画 ()
超级列表框.可视 = 真


i支持库列表   支持库注释   
iext扩展界面支持库一
  
DLL命令名返回值类型公开备 注
sprintf整数型 
DLL库文件名:
ntdll.dll
在DLL库中对应命令名:
@sprintf
参数名类 型传址数组备 注
缓冲区文本型
数据格式文本型
数据整数型



作者: KD飞飞    时间: 2025-1-10 13:03
小小鱿鱼 发表于 2025-1-10 12:25
格式化文本 (“%04d”, 局_当前数a)

楼主一辈子没见过这种东西
作者: 冯古屋    时间: 2025-1-10 13:16
取文本右边(“0000”+到文本(a),4)
作者: 小小鱿鱼    时间: 2025-1-10 13:36
KD飞飞 发表于 2025-1-10 13:03
楼主一辈子没见过这种东西

我叫gpt给你优化的 哈哈
作者: 黑咖啡    时间: 2025-1-10 14:20
不是精易这个吗

无标题.png (39.24 KB, 下载次数: 0)

无标题.png

作者: KD飞飞    时间: 2025-1-10 14:36
小小鱿鱼 发表于 2025-1-10 13:36
我叫gpt给你优化的 哈哈

我试了,牛到批爆,确实能用
海德世人工智能啊~!
作者: qq977352880    时间: 2025-1-10 18:30
来赚个积分,感谢分享。

作者: 花间一壶酒    时间: 2025-1-11 22:54
我也这么写的  哈哈哈哈哈
作者: 花间一壶酒    时间: 2025-1-11 23:01


以前写的  哈哈哈哈哈哈





欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4