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

投稿日: 2003/01/10(Fri) 17:32
投稿者A221
Eメール
URL
タイトルRe: 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 です。
>
> 以上、宜しくお願いします。

CsngでSingle型に変換してみてもだめなのですか?


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

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

- Web Forum -