投稿日 | : 2007/04/16(Mon) 12:24 |
投稿者 | : シュウ |
Eメール | : |
URL | : |
タイトル | : Re: 引数に対応するアルファベットへの変換 |
> いつもお世話になります。
> 引数に対応するアルファベットを返すファンクションを
> 下記のような感じでSelect Caseを使用して作製しています。
>
> Select Case Num
> case 1
> ret = "A"
> case 2
> ret = "B"
> .
> .
> csse 26
> ret = "Z"
> End Select
>
> 力技で書くにはかなりしんどいため
> もう少しスマートな方法、関数等あれば
> 教えてください。
>
> よろしくお願いします。
>
> VB6sp6 WinXpです。
力技には変わりありませんが、配列を用意して1〜26まで
アルファベットを格納しておくのもいいかもしれないですね。