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

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

補足：
１．配列の開放は　ReDim itm(0, 0)　ですよね。
２．1次元配列ID_ALL()を追加したいのですが、うまくできませんでした。

'hoge型の宣言
Private Type hoge
    itm()       As Variant
　　ID_ALL() 　  As Integer  //1次元配列
End Type
'hoge型の配列

    'hoge型の配列の確保
    RedimPreserve_hogeAry itm, 2, 10　　　’この部分変更していません。
For i = 1 To 2
    itm(i).ID_ALL = i　　　’ここで、エラー：配列には割り当てない
    For j = 1 To 2
        itm(i).itm(j) = "a" & i & " ," & j
        Debug.Print "ID_ALL="; itm(i).ID_ALL, "itm(i).itm(j)="; itm(i).it
m(j)
     Next j
Next i

どう解決するのでしょうか。
よろしくお願いします.

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

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