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

解決

ゆう 2003-06-30 23:45:56 No: 78481

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

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

エラーの内容：現時点ではメソッド'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 20:48:18 No: 78482

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