大写数字转换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、则金额数字的大写形式就显示在文档中了。
MechanicWeb怎么样?MechanicWeb好不好?MechanicWeb成立于2008年,目前在美国洛杉矶、凤凰城、达拉斯、迈阿密、北卡、纽约、英国、卢森堡、德国、加拿大、新加坡有11个数据中心,主营全托管型虚拟主机、VPS主机、半专用服务器和独立服务器业务。MechanicWeb只做高端的托管vps,这次MechanicWeb上新Xeon W-1290P处理器套餐,基准3.7GHz最高...
现在宝塔面板真的是越来越过分了,删除文件、删除数据库、删除站点等操作都需要做计算题!我今天升级到7.7版本,发现删除数据库竟然还加了几秒的延时等待,也无法跳过!宝塔的老板该不会是小学数学老师吧,那么喜欢让我们做计算题!因此我写了个js用于去除各种计算题以及延时等待,同时还去除了软件列表页面的bt企业版广告。只需要执行以下命令即可一键完成!复制以下命令在SSH界面执行:Layout_file="/w...
LOCVPS发来了针对XEN架构VPS的促销方案,其中美国洛杉矶机房7折,其余日本/新加坡/中国香港等机房全部8折,优惠后日本/新加坡机房XEN VPS月付仅29.6元起。这是成立较久的一家国人VPS服务商,目前提供美国洛杉矶(MC/C3)、和中国香港(邦联、沙田电信、大埔)、日本(东京、大阪)、新加坡、德国和荷兰等机房VPS主机,基于XEN或者KVM虚拟架构,均选择国内访问线路不错的机房,适合建...
大写数字转换为你推荐
海贼王644集海贼王巴托洛米奥是路飞的忠实粉丝,638集他和贝拉米打的时候路飞给贝拉米加油他知道嘛?最后他说烧烧桌面背景图片非主流想下载非主流桌面背景,有没有专业的背景平台提供下载啊?qq空间首页QQ空间的主页电视直播软件哪个好目前最好的网络电视直播软件是哪个?音乐播放器哪个好最好的音乐播放器是什么浮动利率和固定利率哪个好对于企业来说固定利率贷款与浮动利率贷款优缺点各是什么?谢谢了。加速器哪个好英雄联盟有什么加速器好用的?海克斯皮肤哪个好诺手二周年皮肤好不好,和海克斯那个比哪个好,二周年属于稀有吗雅思和托福哪个好考托福和雅思哪个好考 急。。。。。看书软件哪个好有什么好的读书软件啊?
重庆网站空间 香港虚拟主机 免备案虚拟主机 广东vps 上海vps qq空间域名 n点虚拟主机管理系统 申请免费域名 免费申请域名和空间 科迈动态域名 Vultr 谷歌香港 godaddy支付宝 免费静态空间 本网站服务器在美国 圣诞促销 架设服务器 微信收钱 免费个人空间 徐正曦 更多