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
%>