• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • 將金額小寫轉化成漢字大寫的實現過程

    發表于:2007-06-21來源:作者:點擊數: 標簽:
    下一頁 1 2 3 自己寫的一個比較丑的程序,但做報表時候有用 /******************************************************************** 時間:2003.7.31 作者:千里豬 功能:將貨幣數字(阿拉伯數字)(小寫)轉化成中文(大寫) 參數:Num為字符型,小數點之后保

    下一頁 1 2 3 

       

      自己寫的一個比較丑的程序,但做報表時候有用
      /********************************************************************
      時間:2003.7.31
      作者:千里豬
      功能:將貨幣數字(阿拉伯數字)(小寫)轉化成中文(大寫)
     

      參數:Num為字符型,小數點之后保留兩位,例:Arabia_to_Chinese("1234.06")
      說明:1.目前本轉換僅支持到 拾億(元) 位,金額單位為元,不能為萬元,最小單位為分
                  2.不支持負數
      修改區

      時間:
      修改人:
      原因:

      修改區結束
      ********************************************************************/
      function Arabia_to_Chinese(Num){
       for(i=Num.length-1;i>=0;i--)
       {
        Num = Num.replace(",","")//替換tomoney()中的“,”
        Num = Num.replace(" ","")//替換tomoney()中的空格
       }
       Num = Num.replace("¥","")//替換掉可能出現的¥字符
       if(isNaN(Num)) { //驗證輸入的字符是否為數字
        alert("請檢查小寫金額是否正確");
        return;
       }
       //---字符處理完畢,開始轉換,轉換采用前后兩部分分別轉換---//
       part = String(Num).split(".");
       newchar = "";
       //小數點前進行轉化
       for(i=part[0].length-1;i>=0;i--){
       if(part[0].length > 10){ alert("位數過大,無法計算");return "";}//若數量超過拾億單位,提示
        tmpnewchar = ""
        perchar = part[0].charAt(i);
        switch(perchar){
        case "0": tmpnewchar="零" + tmpnewchar ;break;
        case "1": tmpnewchar="壹" + tmpnewchar ;break;
        case "2": tmpnewchar="貳" + tmpnewchar ;break;


    原文轉自:http://www.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>