精易论坛

标题: 易语言阿拉伯数字转中文简体源码 [打印本页]

作者: 你不丑    时间: 2023-1-23 12:14
标题: 易语言阿拉伯数字转中文简体源码
本帖最后由 你不丑 于 2023-1-23 14:08 编辑
  
子程序名返回值类型公开备 注
数字_转中文简体文本型 阿拉伯数字转中文简体 例如(123转换为一二三)
参数名类 型参考可空数组备 注
欲转换的数字文本型欲转换的阿拉伯数字,只转换阿拉伯数字.传入其他字符无效 例如(123abc易语言,只会返回一二三)
变量名类 型静态数组备 注
局_字节集字节集 
局_长度整数型 
局_文本文本型 
局_计次整数型 
局_字节集 = 到字节集 (欲转换的数字)
局_长度 = 取字节集长度 (局_字节集)
计次循环首 (局_长度, 局_计次)
如果真 (局_字节集 [局_计次] = 48)
局_文本 = 局_文本 + “零”
如果真 (局_字节集 [局_计次] = 49)
局_文本 = 局_文本 + “一”
如果真 (局_字节集 [局_计次] = 50)
局_文本 = 局_文本 + “二”
如果真 (局_字节集 [局_计次] = 51)
局_文本 = 局_文本 + “三”
如果真 (局_字节集 [局_计次] = 52)
局_文本 = 局_文本 + “四”
如果真 (局_字节集 [局_计次] = 53)
局_文本 = 局_文本 + “五”
如果真 (局_字节集 [局_计次] = 54)
局_文本 = 局_文本 + “六”
如果真 (局_字节集 [局_计次] = 55)
局_文本 = 局_文本 + “七”
如果真 (局_字节集 [局_计次] = 56)
局_文本 = 局_文本 + “八”
如果真 (局_字节集 [局_计次] = 57)
局_文本 = 局_文本 + “九”

计次循环尾 ()
返回 (局_文本)
子程序名返回值类型公开备 注
数字_转中文简体1文本型 阿拉伯数字转中文简体 例如(123转换为一二三)
参数名类 型参考可空数组备 注
欲转换的数字字节集欲转换的阿拉伯数字,只转换阿拉伯数字.禁止传入除数字以外的任何字符
变量名类 型静态数组备 注
局_计次整数型 
局_字节集长度整数型 
局_原始长度整数型 
局_字节集字节集 
局_位置整数型 
局_文本文本型 
局_原始长度 = 取字节集长度 (欲转换的数字)
局_字节集 = { 48, 49, 50, 51, 52, 53, 54, 55, 56, 57 }
局_字节集长度 = 取字节集长度 (局_字节集)
计次循环首 (局_原始长度, 局_计次)
局_位置 = 寻找字节集 (局_字节集, 到字节集 (欲转换的数字 [局_计次]), )
局_文本 = 局_文本 + 多项选择 (局_位置, “零”, “一”, “二”, “三”, “四”, “五”, “六”, “七”, “八”, “九”)
计次循环尾 ()
返回 (局_文本)
需要的拿去吧,

2.png (755.82 KB, 下载次数: 0)

简化了一下 ,源码就不传了,直接复制吧

简化了一下 ,源码就不传了,直接复制吧

易语言阿拉伯数字转中文简体源码.e

4.1 KB, 下载次数: 21, 下载积分: 精币 -2 枚

没找到,所以自己写了一个,用完送大家.不值钱.请勿喷.


作者: 蛀牙    时间: 2023-1-23 15:39
写都写了,把 壹贰.....都写了
作者: 豪豪豪111    时间: 2023-1-23 18:11
把繁体的那个也写了吧壹贰
作者: 你不丑    时间: 2023-1-28 07:35
蛀牙 发表于 2023-1-23 15:39
写都写了,把 壹贰.....都写了

不会啊 大佬
作者: lbbj01    时间: 2023-1-28 16:02
你问什么我就答什么
作者: 李泽勇2    时间: 2023-1-30 10:57
感谢分享,下载学习。
作者: ASDFG201302    时间: 2023-2-3 09:14
感谢分享,很给力!~
作者: ASDFG201302    时间: 2023-2-3 09:15
感谢分享,很给力!~
作者: haihai1    时间: 2023-2-7 13:41
6666666666666666666666666666666
作者: 296972885    时间: 2023-2-15 00:05

支持一下
作者: 熬夜    时间: 2023-2-25 11:30
开源精神必须支持~
作者: 网络注册络员    时间: 2023-4-28 13:36
支持开源
作者: jackhow    时间: 2023-5-26 10:55
哈哈,我一般不用这么复杂,只需要取整,然后调到数值到大写,就可以转换成一二三,或者壹贰叁
作者: 丰哥哥    时间: 2023-6-14 16:04
支持一下
作者: mu396    时间: 2023-9-18 10:09
支持开源~!感谢分享
作者: wgqxj    时间: 2023-11-2 00:09
谢谢分享
作者: 南絮    时间: 2023-11-7 08:42
感谢感谢
作者: ebhb    时间: 2023-12-13 16:11
谢谢楼主分享。
作者: ctry78985    时间: 2024-1-22 11:20
感谢分享
作者: 网络注册会员    时间: 2024-3-1 21:24
学习了学习了
作者: lhn0925    时间: 2025-1-22 08:42
学习一下




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