資源描述:
《把金額轉(zhuǎn)換為大寫(xiě).doc》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在學(xué)術(shù)論文-天天文庫(kù)。
1、usingSystem;namespaceHaiNuo{/******************************************************************************************類名:DecimalToUpper**功能:把金額數(shù)據(jù)從小寫(xiě)轉(zhuǎn)換為大寫(xiě)**限制條件:金額小于一萬(wàn)億,且少于兩位小數(shù)**作者:雷俊強(qiáng)junqiang_china@163.com**日期:2003-5-6**用法:DecimalToUpperx=newDecimalToUppe
2、r();**this.textBox2.Text=x.ToUpper(d);**歡迎下載、使用**FORmywifeandmyson******************************************************************************************/publicclassDecimalToUpper{publicDecimalToUpper(){////TODO:在此處添加構(gòu)造函數(shù)邏輯//}//////小寫(xiě)金額轉(zhuǎn)換為大寫(xiě)金額,
3、其他條件:金額小于一萬(wàn)億,最多兩位小數(shù)//////源金額,d《1000000000000.00(一萬(wàn)億),且最多兩位小數(shù)///結(jié)果,大寫(xiě)金額publicstringToUpper(decimald){if(d==0)return"零元整";stringje=d.ToString("####.00");if(je.Length>15)return"";je=newString('0',15-je.Lengt
4、h)+je;//若小于15位長(zhǎng),前面補(bǔ)0stringstry=je.Substring(0,4);//取得'億'單元stringstrw=je.Substring(4,4);//取得'萬(wàn)'單元stringstrg=je.Substring(8,4);//取得'元'單元stringstrf=je.Substring(13,2);//取得小數(shù)部分stringstr1="",str2="",str3="";str1=this.getupper(stry,"億");//億單元的大寫(xiě)str2=this.getuppe
5、r(strw,"萬(wàn)");//萬(wàn)單元的大寫(xiě)str3=this.getupper(strg,"元");//元單元的大寫(xiě)stringstr_y="",str_w="";if(je[3]=='0'
6、
7、je[4]=='0')//億和萬(wàn)之間是否有0str_y="零";if(je[7]=='0'
8、
9、je[8]=='0')//萬(wàn)和元之間是否有0str_w="零";stringret=str1+str_y+str2+str_w+str3;//億,萬(wàn),元的三個(gè)大寫(xiě)合并for(inti=0;i10、去掉前面的"零"{if(ret[i]!='零'){ret=ret.Substring(i);break;}}for(inti=ret.Length-1;i>-1;i--)//去掉最后的"零"{if(ret[i]!='零'){ret=ret.Substring(0,i+1);break;}}if(ret[ret.Length-1]!='元')//若最后不位不是'元',則加一個(gè)'元'字ret=ret+"元";if(ret=="零零元")//若為零元,則去掉"元數(shù)",結(jié)果只要小數(shù)部分ret="";if(strf=
11、="00")//下面是小數(shù)部分的轉(zhuǎn)換{ret=ret+"整";}else{stringtmp="";tmp=this.getint(strf[0]);if(tmp=="零")ret=ret+tmp;elseret=ret+tmp+"角";tmp=this.getint(strf[1]);if(tmp=="零")ret=ret+"整";elseret=ret+tmp+"分";}if(ret[0]=='零'){ret=ret.Substring(1);//防止0.03轉(zhuǎn)為"零叁分",而直接轉(zhuǎn)為"叁分"}retu
12、rnret;//完成,返回}//////把一個(gè)單元轉(zhuǎn)為大寫(xiě),如億單元,萬(wàn)單元,個(gè)單元//////這個(gè)單元的小寫(xiě)數(shù)字(4位長(zhǎng),若不足,則前面補(bǔ)零)///億,萬(wàn),元///轉(zhuǎn)換結(jié)果privatestringgetupper(stringstr