1.先把你的金额转换成Chat String类型;
2.把Chat Strin类型的金额变量已小数点为界分成两个部分;
3.分别用两个转换函数对小数点左右部分进行转换AnsiString ChineseNumber(AnsiString num)
{
num.Delete(num.Length()-2,1);//删除小数点
num.Insert(num.StringOfChar('0',8-num.Length()),1);
AnsiString retval="",CNum="零壹贰叁肆伍陆柒捌玖",CUnit="拾万仟佰拾元
角分";
for(int p,i=1;i<9;i++)
{
p=num.SubString(i,1).ToInt();
retval+=CNum.SubString(p*2+1,2)+CUnit.SubString(i*2-1,2);
}
return retval;
2.把Chat Strin类型的金额变量已小数点为界分成两个部分;
3.分别用两个转换函数对小数点左右部分进行转换AnsiString ChineseNumber(AnsiString num)
{
num.Delete(num.Length()-2,1);//删除小数点
num.Insert(num.StringOfChar('0',8-num.Length()),1);
AnsiString retval="",CNum="零壹贰叁肆伍陆柒捌玖",CUnit="拾万仟佰拾元
角分";
for(int p,i=1;i<9;i++)
{
p=num.SubString(i,1).ToInt();
retval+=CNum.SubString(p*2+1,2)+CUnit.SubString(i*2-1,2);
}
return retval;
{
/*****************************************************************************************
* 类名:DecimalToUpper *
* 功能:把金额数据从小写转换为大写 *
* 限制条件:金额小于一万亿,且少于两位小数 *
* 作者:雷俊强 [email protected] *
* 日期:2003-5-6 *
* 用法:DecimalToUpper x = new DecimalToUpper(); *
* this.textBox2.Text = x.ToUpper(d); *
* 欢迎下载、使用 *
* FOR my wife and my son *
*****************************************************************************************/
public class DecimalToUpper
{
public DecimalToUpper()
{
//
// TODO: 在此处添加构造函数逻辑
//
} /// <summary>
/// 小写金额转换为大写金额,其他条件:金额小于一万亿,最多两位小数
/// </summary>
/// <param name="d">源金额,d 《 1000000000000.00(一万亿),且最多两位小数 </param>
/// <returns>结果,大写金额</returns>
public string ToUpper(decimal d)
{
if (d == 0)
return "零元整";
string je = d.ToString("####.00");
if (je.Length > 15)
return "";
je = new String('0',15 - je.Length) + je; //若小于15位长,前面补0 string stry = je.Substring(0,4); //取得'亿'单元
string strw = je.Substring(4,4); //取得'万'单元
string strg = je.Substring(8,4); //取得'元'单元
string strf = je.Substring(13,2); //取得小数部分
string str1 = "",str2 = "",str3 = ""; str1 = this.getupper(stry,"亿"); //亿单元的大写
str2 = this.getupper(strw,"万"); //万单元的大写
str3 = this.getupper(strg,"元"); //元单元的大写
string str_y = "", str_w = "";
if (je[3] == '0' || je[4] == '0') //亿和万之间是否有0
str_y = "零";
if (je[7] == '0' || je[8] == '0') //万和元之间是否有0
str_w = "零"; string ret = str1 + str_y + str2 + str_w + str3; //亿,万,元的三个大写合并 for (int i = 0 ;i < ret.Length;i++) //去掉前面的"零"
{
if (ret[i] != '零')
{
ret = ret.Substring(i);
break;
} }
for (int i = ret.Length - 1;i > -1 ;i--) //去掉最后的"零"
{
if (ret[i] != '零')
{
ret = ret.Substring(0,i+1);
break;
}
}
if (ret[ret.Length - 1] != '元') //若最后不位不是'元',则加一个'元'字
ret = ret + "元"; if (ret == "零零元") //若为零元,则去掉"元数",结果只要小数部分
ret = "";
if (strf == "00") //下面是小数部分的转换
{
ret = ret + "整";
}
else
{
string tmp = "";
tmp = this.getint(strf[0]);
if (tmp == "零")
ret = ret + tmp;
else
ret = ret + tmp + "角"; tmp = this.getint(strf[1]);
if (tmp == "零")
ret = ret + "整";
else
ret = ret + tmp + "分";
} if (ret[0] == '零')
{
ret = ret.Substring(1); //防止0.03转为"零叁分",而直接转为"叁分"
} return ret; //完成,返回
}
/// <summary>
/// 把一个单元转为大写,如亿单元,万单元,个单元
/// </summary>
/// <param name="str">这个单元的小写数字(4位长,若不足,则前面补零)</param>
/// <param name="strDW">亿,万,元</param>
/// <returns>转换结果</returns>
private string getupper(string str,string strDW)
{
if (str == "0000")
return ""; string ret = "";
string tmp1 = this.getint(str[0]) ;
string tmp2 = this.getint(str[1]) ;
string tmp3 = this.getint(str[2]) ;
string tmp4 = this.getint(str[3]) ;
if (tmp1 != "零")
{
ret = ret + tmp1 + "仟";
}
else
{
ret = ret + tmp1;
} if (tmp2 != "零")
{
ret = ret + tmp2 + "佰";
}
else
{
if (tmp1 != "零") //保证若有两个零'00',结果只有一个零,下同
ret = ret + tmp2;
} if (tmp3 != "零")
{
ret = ret + tmp3 + "拾";
}
else
{
if (tmp2 != "零")
ret = ret + tmp3;
} if (tmp4 != "零")
{
ret = ret + tmp4 ;
}
if (ret[0] == '零') //若第一个字符是'零',则去掉
ret = ret.Substring(1);
if (ret[ret.Length - 1] == '零') //若最后一个字符是'零',则去掉
ret = ret.Substring(0,ret.Length - 1); return ret + strDW; //加上本单元的单位
}
/// <summary>
/// 单个数字转为大写
/// </summary>
/// <param name="c">小写阿拉伯数字 0---9</param>
/// <returns>大写数字</returns>
private string getint(char c)
{
string str = "";
switch ( c )
{
case '0':
str = "零";
break;
case '1':
str = "壹";
break;
case '2':
str = "贰";
break;
case '3':
str = "叁";
break;
case '4':
str = "肆";
break;
case '5':
str = "伍";
break;
case '6':
str = "陆";
break;
case '7':
str = "柒";
break;
case '8':
str = "拐";
break;
case '9':
str = "玖";
break;
}
return str;
}
}
}
{
switch(jj)
{
case "0":
return "零";
case "1":
return "壹";
case "2":
return "贰";
case "3":
return "叁";
case "4":
return "肆";
case "5":
return "伍";
case "6":
return "陆";
case "7":
return "柒";
case "8":
return "捌";
case "9":
return "玖";
default : return "";
}
private string retry_db(double mydb)//双精度转换表;
{
string xiaoshu=null;
string strReturn=null;
string intpark=null;
string strReturn1=null;
if(mydb.ToString().IndexOf('.',0)==-1)
{
int f=0;//-----------------------------------------------------
while(mydb.ToString().Length>=1)
{
string curint=mydb.ToString().Substring(mydb.ToString().Length-1,1);
strReturn1=this.intToChar(curint)+strReturn1;
f++;
if(mydb.ToString().Length==1)
{
break;
}
else
{
mydb=double.Parse(mydb.ToString().Substring(0,mydb.ToString().Length-1));
} //--------------------------------------------------------------
} }
else
{
//整数部分;----------------------------------------------------------
int mydbp=mydb.ToString().IndexOf('.');
intpark=mydb.ToString().Substring(0,mydbp).ToString();
int j=0;
while(intpark.Length>=1)
{ string curInt1=intpark.ToString().Substring(intpark.ToString().Length-1,1);
strReturn1=intToChar(curInt1)+strReturn1;
j++;
if(intpark.ToString().Length==1)
{ break;
}
else
{
intpark=intpark.ToString().Substring(0,intpark.ToString().Length-1); }
}
//结束;--------------------------------------------------------------------
mydbp+=1;//小数部分;--------------------------------------------------------
xiaoshu=mydb.ToString().Substring(mydbp,mydb.ToString().Length-mydbp).ToString();
int i=0;
while(xiaoshu.Length>=1)
{
string curInt=xiaoshu.ToString().Substring(xiaoshu.ToString().Length-1,1);
strReturn=intToChar(curInt)+strReturn;
i++;
if(xiaoshu.ToString().Length==1)
{ break;
}
else
{
xiaoshu=xiaoshu.ToString().Substring(0,xiaoshu.ToString().Length-1); }
}//结束;----------------------------------------------------------------------
}
strReturn=strReturn1+"."+strReturn;
return strReturn;
Mxs = String.Format("{0:c}", CSng(Mxs)).Replace("¥", "")
Mxs = Mxs.Replace(".", "")
Mxs = Mxs.Replace(",", "")
Dim Num1() As String = {"零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖"}
Dim Num2() As String = {"分", "角", "元", "拾", "佰", "仟", "万", "拾", "佰", "仟", "亿", "拾", "佰", "仟", "万", "拾", "佰", "仟"}
Dim Temp1() As String = {"零拾", "零佰", "零仟", "零零", "零元", "零角", "零分", "零万", "万零", "零亿", "亿零", "亿万"}
Dim temp2() As String = {"零", "零", "零", "零", "元", "", "", "万", "万", "亿", "亿", "亿"}
If Trim(Mxs) = "" Then
Return "零元"
End If
Dim i As Integer
Dim strTemp As String = ""
For i = 0 To Mxs.Length - 1
If i > 17 Then
Return "不可能,你输入的金额太大!"
End If
Dim c As Char = Mxs.Chars(Mxs.Length - 1 - i)
If c <> "." Then
strTemp = strTemp.Insert(0, Num2(i))
strTemp = strTemp.Insert(0, Num1(CInt(c.ToString)))
End If Next
Dim j As Integer
For i = 0 To CInt(Mxs.Length / 2)
For j = 0 To 9
strTemp = strTemp.Replace(Temp1(j), temp2(j))
Next
Next
Return strTemp
End Function