- PR -

多次元配列構造体の値代入

1
投稿者投稿内容
Y開発者
会議室デビュー日: 2008/04/10
投稿数: 3
投稿日時: 2008-04-10 11:31
多次元配列構造体で、値を代入すると他の次元の変数値まで、変わってしまいます。
構造体の定義、変数の定義などの仕方に問題があるのでしょうか?
御存じの方がいらっしゃいましたら、ご教授頂けないでしょうか。
宜しくおねがいします。

【環境】
Windows XP Pro
Microsoft Visual Basic 2005
.NET Framework2.0.50727

Public Structure wGData
Dim wKM_1 As Double
Dim wKM_2 As Double
Dim wKM_3 As Double
Dim wKM_4 As Short
Dim wKM_5 As Integer
Dim wKM_6 As String
Dim wKM_7 As String
Dim wKM_8 As Integer
Dim wKM_9 As Integer
Dim wKM_10 As Integer
Dim wKM_11 As Short
Dim wKM_12 As Single
Dim wKM_13 As Single
Dim wKM_14 As Single
Dim wKM_15 As Byte
Dim wKM_16 As Integer
Dim wKM_17 As Integer
Dim wKM_18 As Byte
Dim wKM_19 As Byte
Dim wKM_20 As Byte
Dim wKM_21 As Byte
Dim wKM_22 As Double
Dim wKM_23 As Double
Dim wKM_24 As Double
Dim wKM_25 As Double
Dim wKM_26 As Double
Dim wKM_27 As Double
Dim wKM_28 As Double
Dim wKM_29 As Double
Dim wKM_30 As Double
Dim wKM_31 As Double
Dim wKM_32 As Double
Dim wKM_33 As Double
Dim wKM_34 As Double
Dim wKM_35 As Double
Dim wKM_36 As Double
Dim wKM_37 As Double
Dim wKM_38 As Double
Dim wKM_39 As Double
Dim wKM_40 As Double
Dim wKM_41 As Double
Dim wKM_42 As Double
Dim wKM_43 As Double
Dim wKM_44 As Double
Dim wKM_45 As Double
Dim wKM_46 As Double
Dim wKM_47 As Double
Dim wKM_48 As Double
Dim wKM_49 As Double
Dim wKM_50 As Double
Dim wKM_51 As Double
Dim wKM_52 As Double
Dim wKM_53 As Double
Dim wKM_54 As Double
Dim wKM_55 As Double
Dim wKM_56 As Double
Dim wKM_57 As Double
Dim wKM_58 As Double
Dim wKM_59 As Double
Dim wKM_60 As Double
Dim wKM_61 As Double
Dim wKM_62 As Double
Dim wKM_63 As Double
Dim wKM_64 As Double
Dim wKM_65 As Double
Dim wKM_66 As Double
Dim wKM_67 As Double
Dim wKM_68 As Double
End Structure

Public Sub Test_Sub()
Dim wAnswer As Double
Dim wA(,) As wGData

ReDim wA(0, 1)

wAnswer = wA(0, 1).wKM_2 ' wAnswer = 0

wA(0, 0).wKM_45 = 100

wAnswer = wA(0, 0).wKM_45 ' wAnswer = 100
wAnswer = wA(0, 1).wKM_2 ' wAnswer = 100  代入してないのに、値が変わる

End Sub
じゃんぬねっと
ぬし
会議室デビュー日: 2004/12/22
投稿数: 7811
お住まい・勤務地: 愛知県名古屋市
投稿日時: 2008-04-10 11:58
クロスサイトポストにつきリンクします。
http://forums.microsoft.com/MSDN-JA/ShowPost.aspx?PostID=3149481&SiteID=7

_________________
C# と VB.NET の入門サイト
じゃんぬねっと日誌
よねKEN
ぬし
会議室デビュー日: 2003/08/23
投稿数: 472
投稿日時: 2008-04-10 13:09
もう一つ張っておきますか。
http://hanatyan.sakura.ne.jp/vbnetbbs/wforum.cgi?mode=allread&no=7289&page=0#7289

ちなみに私のところでは同現象は再現できませんでした。
Y開発者
会議室デビュー日: 2008/04/10
投稿数: 3
投稿日時: 2008-04-10 15:18
じゃんぬねっと さん ,よねKEN さん 返信ありがとうございます。

他のページにも投稿していまして、お手数かけてすいません。

再現する人、再現しない人がいるみたいで・・・・・・。
Azulean
大ベテラン
会議室デビュー日: 2008/01/04
投稿数: 123
お住まい・勤務地: 大阪府
投稿日時: 2008-04-10 22:21
引用:

他のページにも投稿していまして、お手数かけてすいません。
再現する人、再現しない人がいるみたいで・・・・・・。


広く情報を求めたいのであればそれを断った上で、それぞれのページにリンクするべきですよ。
解決策が1カ所で提示されていても、アドバイスしようと調べる人の無駄な手間が増えますし、同じような悩みを抱えた人が解決策にたどり着きにくくするだけです。
Y開発者
会議室デビュー日: 2008/04/10
投稿数: 3
投稿日時: 2008-04-11 09:45
Azulean さん 返信ありがとうございます。

Azulean さん,この投稿を見ていただいた方、申し訳ありません。
掲示板に投稿するのが初めてでして、基本的なマナーがわかりませんでした。
以後、気を付けたいと思います。また、投稿することが度々あるとおもいますが、
よろしくお願いします。

おかげさまで、.NET Framework2.0 SP1 をあてることで解決しました。
みなさん、ありがとうございました。
1

スキルアップ/キャリアアップ(JOB@IT)