ねこになりたい

おふとんと朝の別れをするのが辛い人向けです。正論で殴らず見守ってあげてください。

Choose

Choose(index, String, String, ...)

 

一覧の中からindexで指定した位置にある文字列を返す。

私の環境では、indexが1未満でもリストを超える数値を入れても表示されてました。

使いどころあるのかなぁ。。。

 

Sub practice()
Dim animal As Integer

animal = 2

MsgBox Choose(animal, "犬", "猫", "猪") & "になりたい"

End Sub