VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日： 2006/02/13(Mon) 08:47
投稿者： gt
ＵＲＬ：
タイトル： Re^10: 動的に2次元配列

ご返事ありがとう。

> 例えば
> Option Explicit
> 'hoge型の宣言
> Private Type hoge
>     itm() As Variant
> End Type
> 'hoge型の配列
> Private itm() As hoge
>
構造体宣言ことですね。

>     '使ってみる
>     itm(1).itm(0) = "a"
>     'hoge型の配列の拡張
>     Debug.Print itm(1).itm(0)
>     '拡張後、要素が残っているか確かめる
>     ReDim Preserve itm(10)
>     Debug.Print itm(1).itm(0)
下記のようにテストしました。
    '拡張後、要素が残っているか確かめる
    ReDim Preserve itm(10)
    For i = 0 To 9
        Debug.Print itm(i).itm(0)
    Next i
i=3時、エラーが出ました。
実行時エラー9
インデックスが有効範囲にありません。

実際に拡張していないようですね、
   ReDim Preserve itm(10)を宣言したのに、
実際はitm(2)ままになっているようです。

よろしくおねがいします。

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- VBレスキュー(花ちゃん) - - Web Forum -