次のようなこのメソッドがあります。
Public Sub CreateEditbox(sender As Object)
ListBox1 = DirectCast(sender, ListBox)
itemSelected = ListBox1.SelectedIndex
Dim r As Rectangle = ListBox1.GetItemRectangle(itemSelected)
Dim itemText As String = DirectCast(ListBox1.Items(itemSelected), String)
EditBox.Location = New System.Drawing.Point(r.X + 15, r.Y + 15)
EditBox.Size = New System.Drawing.Size(r.Width - 15, r.Height)
editBox.Show()
ListBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.editBox})
editBox.Text = itemText
editBox.Focus()
editBox.SelectAll()
AddHandler EditBox.KeyPress, AddressOf EditOver
AddHandler EditBox.LostFocus, AddressOf FocusOver
End Sub
ボタンクリックからこのメソッドを呼び出せるようにしたいのですが、メソッドの最初の行に見られるように、ボタンクリックイベントからリストボックスの送信者データを取得する方法がよくわかりません。何か案は?
よろしくお願いします、
ヨハン