Hola gente como andan estaba probando como se usan los eventos y mi pregunta es : Como puedo hacer funcionar este codigo o hacer yamar los eventos de este codigo ya que cuando lo compilo n me funciona o sea si pongo los metodos ocntroladore en el modulo funciona pero declarandolos adento de la clase no me funciona

Module Module1
Sub Main()
Dim moAlumnos As Alumnos
moAlumnos = New Alumnos
moAlumnos.Cnombre = "luciana"
moAlumnos.NotaPrueva = 5


End Sub

End Module

Public Class Alumnos

Private WithEvents moAlumnos As Alumnos
Public Sub mo_Alumnos(ByVal nota As Double) Handles moAlumnos.Aprovado
Console.WriteLine("el alumno {0} aprovo", moAlumnos.Cnombre)
End Sub

Public Sub mo_Alumnos1(ByVal nota As Double) Handles moAlumnos.Reprovado
Console.WriteLine("el alumno {0} reprovo", moAlumnos.Cnombre)
End Sub

Public Event Aprovado(ByVal Nota As Double)
Public Event Reprovado(ByVal nota As Double)

Public Cnombre As String
Private VPNotaPrueva As Double

Public Property NotaPrueva() As Double
Get
Return VPNotaPrueva
End Get
Set(ByVal value As Double)
If value > 5.5 Then
RaiseEvent Aprovado(value)
Else
RaiseEvent Reprovado(value)
End If
VPNotaPrueva = value
End Set
End Property
End Class

primero deberias tener algo asi..

Public Event VotoClick(ByVal sender As Object, ByVal e As CommandEventArgs)

para poder llamarlo desde otro lado y no solo desde la clase... si es private solo funciona dentro de la clase la invocacion..

pregunto . . . no es mas facil guardar la nota del alumno en una propiedad y tambien crear una propiedad que se llame condicion y que te tire si aprobo o no.
La sintaxis de VB no la conosco pero seria algo asi