tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re: インデックスが配列の境界外です。
投稿日: 2009/10/17(Sat) 12:02
投稿者オショウ
> このエラーが発生しない為に修正を行いたいです。
> 学習した方が良い項目やコードの指摘を教えて頂きたいです。
> よろしくお願いします。

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        AddMainList("ファイル(&F)", "編集(&E)", "表示(&V)", "設定(&S)", "ヘルプ(&H)")

    End Sub

    Public Sub AddMainList(ByVal ParamArray MenuName() As String)

        Dim item() As ToolStripMenuItem

        MenuStrip1.Items.Clear()

        item = New ToolStripMenuItem(MenuName.GetUpperBound(0)) {}
        For i As Integer = 0 To MenuName.GetUpperBound(0)
            item(i) = New ToolStripMenuItem
            item(i).Text = MenuName(i)
        Next

        MenuStrip1.Items.AddRange(item)
        MenuStrip1.Refresh()

    End Sub

こういう結果が欲しいのでしょうか?

※ クラスでの生成はしてません・・・
  あしからず。

以上。

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

古いスレッドにレスはつけられません。