お世話になります
VB6のメモリ解放に関して、以下を参考に下記のコードで試したのですが、
コンパイルエラーで「配列には割り当てられません」となってしまいます。
http://oshiete.goo.ne.jp/qa/3372573.html
違いは宣言の型がStringかLongしかないと思うのですが、
なにが悪いのか教えていただけないでしょうか
******* 以下 ソース
Dim wProcDat() As Long
ReDim wProcDat(1 To 1000, 1 To 768)
中略
Set wProcDat = Nothing
No.4
- 回答日時:
#補足にすぎませんが
NothingはObjectの場合だけですね。配列はErase()で初期化します。
EraseでDim時の状態に戻ります。静的配列でもできます。
そして・・・
VB6やVBAの場合、ガベージコレクションが自動的にメモリを解放してくれるので、明示的にメモリ解放する必要はあまりナイかと。解放する癖つけた方がいいのは確かですが。
------
・Eraseしなくても解放されます
→ 関数を抜ける時に未使用のメモリが解放されるため、メモリリークの心配はほとんどありません。
・Eraseしても即解放されるわけではない
→ ガベージコレクション対象にセットされるだけで、たいていは関数抜ける時解放されるみたいです。結局メモリ使用量減りません(※)。
------
リンク先はそーいうコト(※)かと。MsgBoxでメモリ増えるとか謎ですし、MsgBox表示でプログラム止まる際にガベージコレクション走りそうですが・・・バージョンによる違いなのかな。。。
回答ありがとうございます。
Eraseの使用方法は判っているつもりで、
Nothingでもできる記述があったので試していたところなんです。
No.3
- 回答日時:
失礼しました。
エラーの発生箇所は Set wProcDat = Nothing ですね。
下記によると動的配列には Erase を使うようです。
http://www.moug.net/tech/acvba/0050008.html
下記のプログラムを作ってみました。
Dim wProcDat() As Long
ReDim wProcDat(1 To 1000, 1 To 768)
wProcDat(1000, 768) = 999
wProcDat(1, 1) = 888
MsgBox wProcDat(1000, 768)
Erase wProcDat
MsgBox "Erase"
MsgBox wProcDat(1, 1)
最後のMsgBoxでインデックスが有効範囲に入りませんから、開放されているようです。
回答ありがとうございます。
Eraseの使用方法は判っているつもりで、
Nothingでもできる記述があったので試していたところなんです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 稀に1円合いません? Sheet1から金額と個数を貼り付ける下記コードで、金額を切り上げるコードを何 3 2022/09/05 15:11
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- Visual Basic(VBA) 別シートのデータを参照して値を入れたい。 まとめデータシートのC列D列の値を商品一覧シートのコードが 7 2022/08/17 13:20
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) Dateserialで データ抽出 2 2022/06/26 21:07
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
メモリの解放について VB6 VBA
Visual Basic(VBA)
-
VB6.0のメモリリークについて
Visual Basic(VBA)
-
VB6 配列を初期化したい
Visual Basic(VBA)
-
-
4
メモリ不足
Visual Basic(VBA)
-
5
VB6でユーザー定義型がNothingかどうか調べるには?
Visual Basic(VBA)
-
6
Visual Basic 6.0 コンボボックスのChangeイベントが発生しません
Visual Basic(VBA)
-
7
配列を関数に渡す方法
Visual Basic(VBA)
-
8
VBプログラムの終了
Visual Basic(VBA)
-
9
VB6.0-整数と余りを求める
Visual Basic(VBA)
-
10
テキストボックスの入力制限
Visual Basic(VBA)
-
11
regsvr32で登録された一覧を知りたい
UNIX・Linux
-
12
Form_Load と Form_Activate のタイミング
Visual Basic(VBA)
-
13
Redimした動的配列はEraseする必要があるのか
Visual Basic(VBA)
-
14
VB6.0でのバイナリデータの扱いについて
Visual Basic(VBA)
-
15
【VB6.0】 あるフォームから他のフォームへ値を受け渡したい
Visual Basic(VBA)
-
16
[VB6] フォームを閉じる方法について
Visual Basic(VBA)
-
17
VB6 String型変数の文字数制限
IT・エンジニアリング
-
18
vb6のVSFlexGridで選択行、列の値を取得し構造体に入れたい
Visual Basic(VBA)
-
19
日付型のフィールドに空白を入れる方法を教えてください
その他(データベース)
-
20
上下の位置揃えについて
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
VB.NETの配列にExcelから読み込...
-
エクセルでXY座標に並べられた...
-
Redim とEraseの違いは?
-
配列の中の最大値とそのインデ...
-
テキストボックの文字を一行ず...
-
VB6のメモリ解放に関して
-
C#でbyte配列から画像を表示さ...
-
Excel2010のinputboxで複数デー...
-
構造体配列内の文字列検索のよ...
-
vba フィルター 複数条件 3つ以...
-
free()関数の多用 と Segment...
-
2次元配列のソート
-
VBAのワークシート関数で配列の...
-
Dir関数で読み取り順を操作でき...
-
ASPで配列を作る方法
-
excel vbaの配列なんですが・・・
-
配列の中から最大値だけ取り出...
-
大量の変数を定義するにはどう...
-
グラフの「項目軸ラベルに使用...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
vba フィルター 複数条件 3つ以...
-
C#でbyte配列から画像を表示さ...
-
Excel2010のinputboxで複数デー...
-
エクセルでXY座標に並べられた...
-
構造体配列の特定のメンバーをF...
-
定数配列の書き方
-
コンボボックスのインデックス...
-
OutOfMemoryExceptionの回避策...
-
Dir関数で読み取り順を操作でき...
-
CheckBoxの配列化
-
構造体配列内の文字列検索のよ...
-
COBOLの基本的な事なので...
-
Redim とEraseの違いは?
-
VBAで配列引数を値渡しできない...
-
2次元配列の初期値
-
配列の中の最大値とそのインデ...
-
大量の変数を定義するにはどう...
-
VB6からの移行したいけど、VB.N...
-
VB6のメモリ解放に関して
おすすめ情報