
Checkbox en DataGridview como validar si esta activo
Publicado por Percy (11 intervenciones) el 25/05/2016 21:30:19
Saludos comunidad, espero me puedan ayudar con un inconveniente que tengo con los permisos de usuario, lo que deseo es validar por rol de usuario los checkbox marcados, los roles se gestionan en otro formulario puedo agregar los que desee y a cada rol le activo el checkbox y este rol se agregar al combobox del inicio de sesion, el problema es que no logro validar por rol que checkbox esta activo dependiendo de ello se muestran o ocultan las opciones del menu principal, adjunto unas imagenes espero me puedan ayudar
roles

inicio de session

el codigo
roles

inicio de session

el codigo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
Private Sub Permisos_Usuarios()
For Each row As DataGridViewRow In DataGridView_ListaModulos.Rows
Dim n As Int32 = CStr(row.Cells("Codigo_Unico").Value)
If Convert.ToBoolean(row.Cells("Permiso").Value) = False Then
With Form_Principal
.ToolStripButton_Productos.Visible = False
.ToolStripButton_Proveedores.Visible = False
.ToolStripButton_Colaboradores.Visible = False
.ToolStripButton_ControlStock.Visible = False
.ToolStripButton_Movimientos.Visible = False
.ToolStripButton_Entradas.Visible = False
.ToolStripButton_Salidas.Visible = False
.ToolStripButton_Reportes.Visible = False
.ToolStripButton_Requermientos.Visible = False
.ToolStripButton_Requerimientos_Colaborador.Visible = False
.ToolStripButton_Usuarios.Visible = False
.ToolStripButton_Configuraciones.Visible = False
End With
Else
With Form_Principal
.ToolStripButton_Productos.Visible = True
.ToolStripButton_Proveedores.Visible = True
.ToolStripButton_Colaboradores.Visible = True
.ToolStripButton_ControlStock.Visible = True
.ToolStripButton_Movimientos.Visible = True
.ToolStripButton_Entradas.Visible = True
.ToolStripButton_Salidas.Visible = True
.ToolStripButton_Reportes.Visible = True
.ToolStripButton_Requermientos.Visible = True
.ToolStripButton_Requerimientos_Colaborador.Visible = True
.ToolStripButton_Usuarios.Visible = True
.ToolStripButton_Configuraciones.Visible = True
End With
End If
Next
Valora esta pregunta


0