(*´д`*)ｱﾊｧ… VB初心者質問スレ Part14
■ このスレッドは過去ログ倉庫に格納されています
0801デフォルトの名無しさん
NGNGこんな感じです。
Redimで落ちてるからメモリ不足なんだろうけど
構造体の配列ってやばいんですかね。
Do While Not EOF(intFile) ' ファイルの終端までループを繰り返します。
ReDim Preserve typKeyInfo.typRelInfo(lngRTrm + 1) '関連情報配列確保
Line Input #intFile, strData
'配列に入れる文字列処理
lngRTrm = lngRTrm + 1 '関連ターム数加算
Loop
■ このスレッドは過去ログ倉庫に格納されています