Que tal!!!
... estoy desarrollando mis primeras aplicaciones en visual basic .net y me he encontrado con el siguiente error: Este es mi codigo:
Namespace VB2005
Public Class clsPrueba
Public Function Mifuncion() As Boolean
If Now.TimeOfDay.Hours > 12 Then
Return True
Else
Return False
End If
End Function
End Class
End Namespace
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim miclase As New VB2005.clsPrueba
msgbox(if(miclase.Mifuncion(),"P.M","A.M"))
End Sub
Y me sale el siguiente error:
Statement is not valid in a namespace, el error figura en la linea donde declaro el Sub Form1_load
que puedo hacer ?
muchas gracias