
お世話になります。
VB.net(visual studio 2005)の配列について教えて下さい。
以下の様に3次元の配列を宣言したとします(要素数は宣言せず)
Protected strArray(,,) As String
その後、プログラムのイニシャライズルーチン中で要素数を設定しています。
ReDim Preserve strArray(2,5,10)
プログラム中でこの配列の要素数が増える事があります。
一番右の配列 10 を 15 などに増やす事は redim で可能だとおもわれますが
真ん中の 5 を 8 などに増やしたいのです。
その際、配列に保存した情報は消えてしまってもかまわないので
要素数を一度リセットし、再度要素数を宣言したいのですがリセットの方法がわかりません。
ご教授お願い致します。

No.1ベストアンサー
- 回答日時:
>その際、配列に保存した情報は消えてしまってもかまわないので
>要素数を一度リセットし、再度要素数を宣言したいのですがリセットの方法がわかりません。
配列に保存した情報は消えてもよいなら、
RedimでOKです。(Preserve を付けない)
Preserve は中身を保証するときにつけます。
Dim strArray(,,) As String
Dim r1, r2, r3 As Long
ReDim strArray(2, 5, 10)
r1 = UBound(strArray, 1)
r2 = UBound(strArray, 2)
r3 = UBound(strArray, 3)
MsgBox(r1 & ":" & r2 & ":" & r3)
ReDim strArray(3, 8, 15)
r1 = UBound(strArray, 1)
r2 = UBound(strArray, 2)
r3 = UBound(strArray, 3)
MsgBox(r1 & ":" & r2 & ":" & r3)
上記を実行してください。
配列のサイズが変更されていることが確認できます。
回答ありがとうございます。
> 配列に保存した情報は消えてもよいなら、
> RedimでOKです。(Preserve を付けない)
> Preserve は中身を保証するときにつけます。
Preserve の意味は理解していたのですが
「一番右の要素数の変更しか許していない」という仕様が
(Redim Preserveではなく)Redimの時でも許可されていないとなぜか思い込んでいました。
少し試してみれば分かる事でしたがぽっかりと抜け落ちていたようです。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
IF関数でEmpty値を設定する方法。
-
動的配列が存在(要素が有る)か...
-
VBで作った乱数を一度も重複さ...
-
変数を動的に作るには?
-
パソコンキーボードで時分秒を...
-
VB.net 引数で配列変数を渡す際...
-
VBAで配列の計算
-
EXCEL VBA で、0から?1から?
-
五目並べのプログラムを配列と...
-
For文と配列
-
配列の要素数を超えた参照のコ...
-
C言語 重複しない4ケタの乱数...
-
排列と配列の漢字の使い分けは
-
Excel VBAで配列の途中から(X)M...
-
遅延バインディングを使用でき...
-
【MFC】GetCount()とGetSize()...
-
エクセルで小数の中の最大値を...
-
配列にある重複要素を削除した...
-
10進数を4桁のバイト配列に格納...
-
オブジェクトの中のプロパティ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
動的配列が存在(要素が有る)か...
-
IF関数でEmpty値を設定する方法。
-
VBAで配列の計算
-
VB.net 引数で配列変数を渡す際...
-
C言語 重複しない4ケタの乱数...
-
EXCEL VBA で、0から?1から?
-
パソコンキーボードで時分秒を...
-
C#の質問
-
変数を動的に作るには?
-
配列の要素数を超えた参照のコ...
-
VBで作った乱数を一度も重複さ...
-
Excel VBAで配列の途中から(X)M...
-
Visual C++ でコントロールを...
-
VBでbyte配列型のインスタンス...
-
For文と配列
-
複数のテキストボックスに同じ...
-
五目並べのプログラムを配列と...
-
格闘ゲームのコマンド判定について
-
フォームコントロールのチェック
-
遅延バインディングを使用でき...
おすすめ情報