La cláusula Handles requiere una variable WithEvents ????

[luis456]

Hola tengo un código cedido amablemente por Elektro Ha@cker pero no logro que funcione después de googlear bastante  no me aclaro con este error..

" La cláusula Handles requiere una variable WithEvents definida en el tipo contenedor o en uno de sus tipos base "

No se si es porque hago el form pongo los controles pero pongo el codigo despues ?

Código (vbnet) [Seleccionar] Expandir

Public Class Form1

   Private TextBoxes As TextBox() = {Nothing}

   Private Result1 As Int32(), Result2 As Int32()

   ReadOnly Property Num1 As Int32
       Get
           Return CInt(TextBox1.Text)
       End Get
   End Property

   ReadOnly Property Num2 As Int32
       Get
           Return CInt(TextBox2.Text)
       End Get
   End Property

   Private Sub Sumar(sender As Object, e As EventArgs) _
   Handles Button_Sum.Click

       Dim TextBoxCount As Short = -1

       TextBoxes = {TextBox3, TextBox4, TextBox5, TextBox6}

       Result1 = {Num1 + 15, Num1 + 25} _
                 .Distinct().ToArray ' Elimino duplicados

       Result2 = {Num2 + 30, Num2 + 20} _
                 .Distinct().ToArray ' Elimino duplicados

       Array.Sort(Result1) : Array.Sort(Result2) ' Ordeno los Items

       For Each Number As Int32 In Result1
           TextBoxCount += 1
           TextBoxes(TextBoxCount).Text = Number
       Next

       For Each Number As Int32 In Result2
           TextBoxCount += 1
           TextBoxes(TextBoxCount).Text = Number
       Next

   End Sub

End Class


Luis

[Eleкtro]

Hola,

Esto ya intenté explicártelo, aquí tienes documentación: http://msdn.microsoft.com/en-us/library/stf7ebaz%28v=vs.90%29.aspx

El error está aquí:

Código (vbnet) [Seleccionar] Expandir

Handles Button_Sum.Click

Copiaste el ejemplo que te proporcioné sin fijarte lo suficiente,
lo que sucede es que en tu aplicación no tienes ningún botón que se llame "Button_Sum".

Ese es el nombre que le di yo al botón de sumar de mi ejemplo:

Para resolverlo símplemente tienes que reemplazar/usar en esa linea el nombre correcto de tu boton (Ej: Handles button1.click)...

PD: No confundir el nombre del control, con el texto del control (Button_Sum, "Sum").

Un saludo

[luis456]

Hola,

Esto ya intenté explicártelo, aquí tienes documentación: http://msdn.microsoft.com/en-us/library/stf7ebaz%28v=vs.90%29.aspx

El error está aquí:
Copiaste el ejemplo que te proporcioné sin fijarte lo suficiente,
lo que sucede es que en tu aplicación no tienes ningún botón que se llame "Button_Sum".

Ese es el nombre que le di yo al botón de sumar de mi ejemplo:

Para resolverlo símplemente tienes que reemplazar/usar en esa linea el nombre correcto de tu boton (Ej: Handles button1.click)...

PD: No confundir el nombre del control, con el texto del control (Button_Sum, "Sum").

Un saludo

Ya de verdad estoy seguro que las facultades de observacion a los 53 se pierden un poco 

de nuevo gracias

Luis