大写数字转换word中如何将小写金额数字转换为大写
大写数字转换 时间:2021-01-12 阅读:(
)
怎样将数字转换成大写
在word2007使用过程中我们经常会遇到一些需要转换成大写的阿拉伯数字,,但是很多大写数字我们不会写。
不过没关系,今天小编来教大家在Word2007怎么将阿拉伯数字转换成大写数字的,一起来看看Word2007将阿拉伯数字转换成大写数字方法吧!①首先,选中需要转换的数字;②单击菜单栏的“插入”中的“数字”;③在弹出的“数字”对话框中的“数字类型”中选择“壹、贰、叁……”,然后确定。
怎样,结果是否已经变成了“玖仟玖佰玖拾玖”,转换过来的大写数字快速而又准确,不用白不用!以上就是小编关于Word2007怎么将阿拉伯数字转换成大写数字的内容,希望对大家有所帮助,更多精彩教程请关注。
求个中文大写数字转换成阿拉伯数字的函数
我给初值给错了..不好意思.已改正..
public int getNum(string val)
{
int result=0;
string[] bnum={"一","二","三","四","五","六","七","八","九","零"};
string[] bfix={"十","百","千","万","亿"};
int[] snum={1,2,3,4,5,6,7,8,9,0};
int[] sfix={10,100,1000,10000,100000000};
if(val.Substring(0,1).Equals("十"))
{
val="一"+val;
}
int one=0;
bool key=false;
int last=10;
for(int ii=0;ii<val.Length;ii++)
{
if(!key)
{
string num=val.Substring(ii,1);
for(int jj=0;jj<bnum.Length;jj++)
{
if(num.Equals(bnum[jj]))
{
key=true;
one=snum[jj];
if(one==0){
last=last/10;
key=false;
break;
}
if(ii==val.Length-1)
{
result+=one*last/10;
}
break;
}
}
}
if(key)
{
string fix=val.Substring(ii,1);
for(int kk=0;kk<bfix.Length;kk++)
{
if(fix.Equals(bfix[kk]))
{
last=sfix[kk];
key=false;
result=result+one*last;
break;
}
}
}
}
return result;
}
调用的时候:
int num=this.getNum(this.TextBox1.Text);//如果为非法输入则返回0EXCEL如何将大写数字转换为阿拉伯数字
如果你不想用选择替换功能的话,请用下面这个宏。
工具---宏---编辑
将一下代码复制粘贴进去。
运行宏。
--------------------
Sub 数字转换()
Range("A1").Select
Cells.Replace What:="十一", Replacement:="11", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十二", Replacement:="12", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十三", Replacement:="13", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十四", Replacement:="14", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十五", Replacement:="15", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十六", Replacement:="16", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十七", Replacement:="17", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十八", Replacement:="18", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十九", Replacement:="19", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="一", Replacement:="1", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="二", Replacement:="2", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="三", Replacement:="3", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="四", Replacement:="4", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="五", Replacement:="5", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="六", Replacement:="6", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="七", Replacement:="7", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="八", Replacement:="8", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="九", Replacement:="9", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub
这个宏的极限是翻译到十九,如果需要还可以修改,应该够你用了。
请采纳,谢谢!word中如何将小写金额数字转换为大写
材料/工具:word2016
1、打开相关的word文档,比如要将金额数字15263转换为大写数字。
2、点击插入菜单按钮,选择“数字”按钮。
3、出现“数字”对话框。
4、在数字输入框中输入数字15263,在“数字类型”中点击向下的三角形选中“壹,贰,叁 ...”,点击“确定”。
5、则金额数字的大写形式就显示在文档中了。
paypal贝宝可撸$10的代金券!这两天paypal出了活动,本次并没有其他的限制,只要注册国区的paypal,使用国内的手机号和62开头的银联卡,就可以获得10美元的代金券,这个代金券购买产品需要大于10.1美元,站长给大家推荐几个方式,可以白嫖一年的VPS,有需要的朋友可以看看比较简单。PayPal送10美元活动:点击直达活动sfz与绑定卡的号码可以重复用 注册的邮箱,手机号与绑的银联卡必须...
Hostinger 商家我们可能一些新用户不是太熟悉,因为我们很多新人用户都可能较多的直接从云服务器、独立服务器起步的。而Hostinger商家已经有将近十年的历史的商家,曾经主做低价虚拟主机,也是比较有知名度的,那时候也有接触过,不过一直没有过多的使用。这不这么多年过去,Hostinger商家一直比较稳妥的在运营,最近看到这个商家在改版UI后且产品上也在活动策划比较多。目前Hostinger在进...
官方网站:点击访问青果云官方网站活动方案:—————————–活动规则—————————1、选购活动产品并下单(先不要支付)2、联系我司在线客服修改价格或领取赠送时间3、确认价格已按活动政策修改正确后,支付订单,到此产品开设成功4、本活动产品可以升级,升级所需费用按产品原价计算若发生退款,按资源实际使用情况折算为产品原价再退还剩余余额! 美国洛杉矶CN2_GIACPU内存系统盘流量宽带i...
大写数字转换为你推荐
唐人社美国10次啦7个多月的宝宝大人扶着站立时脚尖着地,我们去体检时大夫说是尖足,要我们做什么按摩400块10次。有必要做登陆qq空间首页QQ空间打开就显示主页迈腾和帕萨特哪个好新迈腾和新帕萨特哪个更好一点·哪个更实用一点 ···明白人给解释一下·朗逸和速腾哪个好大众速腾与朗逸哪个好飞信空间登录关于飞信登陆方式考生个人空间登录自学考试的“考生个人空间”密码忘记了……一定要本人带身份证和考籍证去有关部门吗?辽宁联通网上营业厅辽宁联通怎样用发短信方式查询话费和流量诛仙青云志360云盘资源求诛仙青云志全集资源360云盘怎么用360云盘怎么运用和有什么用法便宜的反义词便宜的反义词可以是宝贵吗
过期域名查询 香港vps主机 新网域名解析 抢票工具 512au 大容量存储 php空间申请 微信收钱 jsp空间 工信部icp备案号 可外链相册 100m独享 中国电信测速网 卡巴斯基破解版 超级服务器 linode支付宝 全能空间 hdroad globalsign ipower 更多