投稿日 | : 2003/12/24(Wed) 12:47 |
投稿者 | : 九十九 |
Eメール | : |
URL | : |
タイトル | : ありがとうございます。 |
> Dim arr_str(0 To 50) As String
> Dim arr_str1(10 To 50) As String
> Dim arr_str2(50) As String
> Debug.Print UBound(arr_str) - LBound(arr_str) + 1
> Debug.Print UBound(arr_str1) - LBound(arr_str1) + 1
> Debug.Print UBound(arr_str2) - LBound(arr_str2) + 1
ありがとうございます。