投稿者 大池  (社会人) 投稿日時 2012/3/17 10:06:09
いつもお世話になるばかりで申し訳ありません。
XPでVB2008を勉強しています。
次のような構造体を作ってテストしていますが、
  Private Structure test1
        Dim aa As String
        Dim bb() As Single
        Dim cc() As Single
        Public Sub initialize()
            ReDim bb(10)
            ReDim cc(10)
        End Sub
    End Structure
配列へのデータ設定のところで次のような警告と実行時エラーがでます。
これはどのように対処すればいいのでしょうかご指導のほどよろしくお願いいたします。
        
        Dim dd As test1
        dd.aa = "aa"
        dd.bb(1) = 1.23  <== ◎オブジェクト参照がオブジェクト インスタンスに設定されていません。
        dd.cc(1) = 4.56
        Debug.Print(dd.aa + ":" + dd.bb(1).ToString + ":" + dd.cc(1).ToString)

◎警告1変数 'bb' は、値が割り当てられる前に使用されています。Null 参照の例外が実行時に発生する可能性があります。  
'cc'も同じ警告です