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

投稿日: 2003/01/10(Fri) 15:15
投稿者Abe-N
URL
タイトルVB6で変数に値を代入するとエラー

VB6で変数に値を代入すると、エラーが発生します。
データの型、範囲は間違っていません。
回避方法はないでしょうか?

ソースは、以下の通りです。

ReDim Mφin(0 To 1, 0 To 1, 1 To 断面数)
'↑断面数は最大10です。

For Hoko% = 0 To 1
        For ifr% = 0 To 1
            For I% = 1 To 断面数
                Mφin(Hoko%, ifr%, I%).Upos = 0
                Mφin(Hoko%, ifr%, I%).nbun = 計算分割数
                '↓このステートメントでオーバーフローします。           
         Mφin(Hoko%, ifr%, I%).sgmsy = wsgmsy
      Next
        Next
Next

*Mφin(Hoko%, ifr%, I%).sgmsyはDouble型、wsgmsyはSingle型で、
 値は 23000 です。

以上、宜しくお願いします。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -