Mil gracias nuevamente Winexim!!!
Anduvo de mil maravillas, es lo que estaba buscando. Lo del módulo no lo sabía, soy medio inexperto en programación, jeje!!
¿Es como declarar una variable global no?
Me vino bárbaro porque el sistema lo estoy haciendo en 4 capas y al agregar ese módulo lo puedo utilizar en toda esa capa (en este caso la UI).
El código del form principal me quedó así entonces, así lo puede ver quien quiera:
Código:
Public Class Acceso
Private Sub Acceso_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ArchivoToolStripMenuItem.Available = False
AdministracionToolStripMenuItem.Available = False
ClientesToolStripMenuItem.Available = False
ProductosToolStripMenuItem.Available = False
VentasToolStripMenuItem.Available = False
EmpleadosToolStripMenuItem.Available = False
End Sub
Private Sub LoginToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LoginToolStripMenuItem.Click
Login.ShowDialog()
If LoginSucceeded Then
LoginToolStripMenuItem.Available = False
ArchivoToolStripMenuItem.Available = True
AdministracionToolStripMenuItem.Available = True
ClientesToolStripMenuItem.Available = True
ProductosToolStripMenuItem.Available = True
VentasToolStripMenuItem.Available = True
EmpleadosToolStripMenuItem.Available = True
End If
End Sub
Private Sub SalirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SalirToolStripMenuItem.Click
Me.Close()
End Sub
End Class
Me olvidaba, mi base está en SQL 2008.
Ahora resta seguir perfeccionándolo.
Muchas gracias.
Saludos,