オブジェクトを動的に生成するには?

解決


ゆう  2003-06-30 14:45:56  No: 78481  IP: [192.*.*.*]

たびたびお世話になります。

現在フォーム上のタブページに動的にページを追加し、
オブジェクトを配置するプログラムを書いているのですが、
1ページ目は正常にプログラムを通過するのですが2ページ目で
エラーが発生します。

エラーの内容:現時点ではメソッド'FixedCols'のsetプロパティを呼び出せません。

ソースはこんな感じです。(テスト用つくりました)
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim tabpage As TabPage() = New TabPage(10) {}
        Dim Flex As AxMSHierarchicalFlexGridLib.AxMSHFlexGrid(,) = New AxMSHierarchicalFlexGridLib.AxMSHFlexGrid(10, 10) {}

        Dim i As Integer
        Dim j As Integer

        For i = 0 To 10
            tabpage(i) = New TabPage()
            tabpage(i).Text = "PAGE=" & i
            tabFloor.TabPages.Add(tabpage(i))

            For j = 0 To 10
                Flex(i, j) = New AxMSHierarchicalFlexGridLib.AxMSHFlexGrid()

                With Flex(i, j)
                    tabpage(i).Controls.Add(Flex(i, j))
                    Try
                        .FixedCols = 0
                        .FixedRows = 0
                        .Rows = 7
                        .set_Cols(, 10)
                    Catch ex As Exception
                        Trace.WriteLine(ex.ToString)
                    End Try

                End With
            Next
        Next
    End Sub

どこがおかしいのかまったく検討がつきません。
よろしくお願いします。

Windows XP , VB.NET です

編集 削除
ゆう  2003-07-01 11:48:18  No: 78482  IP: [192.*.*.*]

自己レスです。解決しました。

編集 削除