以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  中文数字与阿拉伯数字如何互换?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=34704)

--  作者:xfilemark
--  发布时间:2013/6/13 14:25:00
--  中文数字与阿拉伯数字如何互换?
请问诸位师傅前辈,中文数字与阿拉伯数字如何互换?
比如:“一” 转换为1;1转换为“一”

--  作者:Bin
--  发布时间:2013/6/13 14:32:00
--  
什么意思?  
"1二3" 换成 "一2三"  ?

--  作者:xfilemark
--  发布时间:2013/6/13 14:34:00
--  
Bin,就是类似于这种效果
--  作者:狐狸爸爸
--  发布时间:2013/6/13 14:39:00
--  

怎么会有这么奇怪的问题啊:

 

 

Dim zw1 As String = "零一二三四五六七八九"
Dim val1 As String = "6九八1"
Dim val2 As String
For Each c  As String In val1
   If Char.IsDigit(c) Then
        val2 = val2 & zw1(cint(c))
    Else
        val2 = val2 & zw1.IndexOf(c)
    End If
Next
output.show(val2)

 


--  作者:傻马难骑
--  发布时间:2013/6/13 15:37:00
--  

上午我刚做了个公历转农历,就用到将年份转为中文字,自己写的很复杂,没想到狐爸这么简单几句就行了,我去替换下图片点击可在新窗口打开查看


--  作者:狐狸爸爸
--  发布时间:2013/6/13 15:38:00
--  

转换中文系统自带有:

http://www.foxtable.com/help/topics/1345.htm

 


--  作者:傻马难骑
--  发布时间:2013/6/13 16:14:00
--  
以下是引用狐狸爸爸在2013-6-13 15:38:00的发言:

转换中文系统自带有:

http://www.foxtable.com/help/topics/1345.htm

 

 

  我帮助看得不仔细


--  作者:狐狸爸爸
--  发布时间:2013/6/13 16:19:00
--  

帮助处处是宝,不要错过。

不是王婆卖瓜,foxtable的帮助可能是你能找到的最好的帮助文件。


--  作者:傻马难骑
--  发布时间:2013/6/13 16:45:00
--  
以下是引用狐狸爸爸在2013-6-13 16:19:00的发言:

帮助处处是宝,不要错过。

不是王婆卖瓜,foxtable的帮助可能是你能找到的最好的帮助文件。

 

  狐爸,将阿拉伯数字转换为中文小写格式时,数字0还是按大写格式转换为“零”了,是不是应该转换为“O”呀?


--  作者:狐狸爸爸
--  发布时间:2013/6/13 16:58:00
--  
这个没有标准,你可以将转换结果中的零替换为O