2016-07-03 6 views
0

VB.NetにWebアプリケーションがあり、そこにランクを与える必要があります。ランクが計算された後、私はこのような接尾辞を入れたい:第1、第2、第3、第4などどのように各番号に適切な接尾辞を置くか考えてください?asp.netの数字の後に接尾辞を設定する

答えて

2

Integer(またはLong)を引数とし、このような序数文字列を返す単純な関数を書くことができます。

Private Function Ordinal(num As Long) As String 
    Dim suff As String = "th" 
    If num < 4 Or num > 20 Then 
     Select Case num Mod 10 
      Case 1 
       suff = "st" 
      Case 2 
       suff = "nd" 
      Case 3 
       suff = "rd" 
     End Select 
    End If 
    Return num.ToString & suff 
End Function 

あなたは千個の区切りでフォーマットする番号を好む場合は、

Return num.ToString("N0") & suff 'e.g. 1,234th 

Return文を変更するには、この

Dim myNum as Integer = 123 
Dim myOrd as String = Ordinal(myNum) 'will be 123rd 
のような関数を呼び出します
関連する問題