VBAで定数の配列モドキを作る

VBAの言語仕様上、定数の配列を作る方法が用意されていないらしい*1
そこで、定数の配列の代替となるものを作ってみた。

*1 : 誰か作り方を知ってたら教えて下さい

環境

  • Access 2003 (SP3)

定数の配列モドキ

以下は配列の添え字が増分するごとにアルファベットを1進めるもの

Public Function alphaArray(Byval num As Long) As String
  Select Case num
    Case 0:
      alphaArray = "A"
    Case 1:
      alphaArray = "B"
    Case 2:
      alphaArray = "C"
    (中略)
    Case 25:
      alphaArray = "Z"
    Case Else
      alphaArray = null
  End Select
End Function