Cómo definir eventos en la matriz de control definida en VB.net

¿Importaciones?System.Text

Importaciones?System.Windows

Importaciones?System.Windows.Forms

¿Clase?Pública?Netin ?'Class?Name

'Hereda?Forms.Form Public?Shared?Netin?As?New?Form Public?components?As?ComponentModel.IContainer Protected?Anulaciones?Sub?Finalize()

MyBase.Finalize() End?Sub? Public?Sub?InitializeComponent() Me.components?=?New?ComponentModel.Container() Dim?resources?As?ComponentModel.ComponentResourceManager?=? ¿Nuevo?System.ComponentModel.ComponentResourceManager(GetType(bjt)) Me.TextBox1?=?New?TextBox(Me.components) Me.Button1?=?New?Button(Me.components)

'Para ?…?Siguiente Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.Button1) Me.m?=?New?ContextMenuStrip(Me.components) Me.m1.Text?=?"Elemento de menú 1 "?

'Establecer y agregar controles relacionados, (formulario) Netin? inicialización. End?Sub Private?Sub?Form_Load(sender?As?Object,?e?As?EventArgs)?Handles?Me.Load 'Muestra el formulario Netin después de cargarlo. ¿Fin?Sub Público?Sub?ObjClick(ByVal?Sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click,Button2.Click,Button3.Click,TextBox1.Click MessageBox? .Show("Hiciste clic con el mouse") End?Sub Public?WithEvents?TextBox1?As?TextBox Public?WithEvents?Button1?As?Button Public?WithEvents?Button2?As?Button Public?WithEvents?Button3?As?Button Amigo ?WithEvents?m?As?ContextMenuStrip Friend?WithEvents?m1?As?ToolStripMenuItem

Fin?Clase

Clase?MainWindow

Netin.Show()

Netin.Button2.Text?=?"Principal" ……