none
動態產生物件的連結問題 RRS feed

  • 問題

  • 我動態產生三個按鈕

    然後下面連結的地方

    我不曉得怎麼寫

    當我按第一個就是顯示第一個的name
    按第二個就是顯示第二個的name

    類推...

    謝謝高手


    Public Class Form1
        Dim pi(3) As Button

        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
            For i = 3 To 1 Step -1

                pi(i) = New Button

                pi(i).Visible = True

                pi(i).Width = 40
                pi(i).Height = 30
                pi(i).Name = "ph" & i
                pi(i).Text = pi(i).Name
                pi(i).Location = New Point(50, 100 - (i * 25))
                Me.Controls.Add(pi(i))
                AddHandler pi(i).Click, AddressOf Button1_Click
            Next

      End Sub


        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btna.Click

            Label1.Text =   .Name

        End Sub
    End Class

    粗體字這邊是我的問題
    如何寫出 讓他知道 是誰按的....拜託了

    2009年6月28日 上午 05:44

解答

所有回覆