C#根据输入的数字计算 4 位数的标识串!

using System;

namespace NewsDataTransceiver

ASP 的实现方法:

<%
' 根据输入的数字计算 4 位数的标识串，本函数保证输入数字在 0 - 1500625(5位：60466175) 之内不出现重复串 
PUBLIC FUNCTION MakeCode4(Num)
    DIM Num1,Num2,Num3,Num4,Num5,Num6,Num7
    Num1=Num Mod 35
    Num2=(Num \ 35) Mod 35 
    Num3=(Num \ 1225) Mod  35
    Num4=(Num \ 42875) Mod 35
'    Num5=(Num \ 1500625) Mod 35

   MakeCode4=GetNumStr(Num4) & GetNumStr(Num3) & GetNumStr(Num2) & GetNumStr(Num1)
END FUNCTION
PUBLIC FUNCTION GetNumStr(Num)
Select case Num
    case 0
        GetNumStr="K"
    case 1
        GetNumStr="Z"
    case 2
        GetNumStr="S"
    case 3
        GetNumStr="5"
    case 4
        GetNumStr="H"
    case 5
        GetNumStr="A"
    case 6
        GetNumStr="P"
    case 7
        GetNumStr="9"
    case 8
        GetNumStr="N"
    case 9
        GetNumStr="7"
    case 10    
        GetNumStr="6"
    case 11    
        GetNumStr="2"
    case 12    
        GetNumStr="G"
    case 13    
        GetNumStr="0"
    case 14    
        GetNumStr="B"
    case 15    
        GetNumStr="D"
    case 16    
        GetNumStr="C"
    case 17    
        GetNumStr="F"
    case 18    
        GetNumStr="1"
    case 19    
        GetNumStr="J"
    case 20    
        GetNumStr="I"
    case 21    
        GetNumStr="W"
    case 22    
        GetNumStr="E"
    case 23    
        GetNumStr="3"
    case 24    
        GetNumStr="R"
    case 25    
        GetNumStr="V"
    case 26    
        GetNumStr="X"
    case 27    
        GetNumStr="L"
    case 28    
        GetNumStr="4"
    case 29    
        GetNumStr="M"
    case 30    
        GetNumStr="Y"
    case 31    
        GetNumStr="Q"
    case 32    
        GetNumStr="8"
    case 33    
        GetNumStr="T"
    case 34    
        GetNumStr="U"
    END SELECT
END FUNCTION
%>