No me funciona ejemplo de sobrecarga

[Meta]

Hola:

Quiero hacer un mini ejemplo sobre Overloads y no me fucniona.

Código (vbnet) [Seleccionar] Expandir

Module Module1

   Sub Main()
       Dim Ejemplo1 As String = "AAAA"
       Dim Ejemplo2 As Integer = 123445

       testSub()
       testSub(Ejemplo1)
       testSub(Ejemplo2)
       testSub(Ejemplo1, Ejemplo2)

   End Sub

   Overloads Sub testSub()
       Debug.WriteLine("No pasa nada.")
   End Sub

   Overloads Sub testSub(ByVal i As String)
       Debug.WriteLine(i)
   End Sub

   Overloads Sub testSub(ByVal i As Integer)
       Debug.WriteLine(i.ToString)
   End Sub

   Overloads Sub testSub(ByVal i As String, ByVal j As Integer)
       Debug.WriteLine(i & " -- " & j.ToString)
   End Sub
End Module

Error    2    Uso no apropiado de la palabra clave 'Overloads' en un módulo.    C:\Users\Usuario\documents\visual studio 2010\Projects\Ejemplito\Ejemplito\Module1.vb    18    5    Ejemplito

A pesar de leer por aquí sobre Overloads, no me guío.

Salu2.

[seba123neo]

los modulos comunes no soportan Overload, aparte fijate que te la subraya y te dice , tenes que hacerlo dentro de una clase.

saludos.

[seba123neo]

borren esto.

[Meta]

Cierto, ya me funciona, gracias.