Shell 26-11-2021, 13:46
Buenas!.
¿ Existe alguna forma en Linux de que el usuario no vea ciertos menús del escritorio, de que no pueda usar ciertas aplicaciones ( ok, esto es administrador ) ?.
Cuando el usuario ve un menú de aplicaciones, opciones, encuentra de todo. Y hay cosas que a lo mejor pueden ser no adecuadas para alguien que comienza
con Linux. Supongamos que tiene acceso a un número de aplicaciones determinadas pero no al resto.
Por decir algo. Libreoffice, navegador y otras más. Digamos que las aplicaciones que realmente va utilizar.
O crear un usuario que tiene un uso del sistema "limitado".
Imaginar que es un niño.
Saludos
¿ Existe alguna forma en Linux de que el usuario no vea ciertos menús del escritorio, de que no pueda usar ciertas aplicaciones ( ok, esto es administrador ) ?.
Cuando el usuario ve un menú de aplicaciones, opciones, encuentra de todo. Y hay cosas que a lo mejor pueden ser no adecuadas para alguien que comienza
con Linux. Supongamos que tiene acceso a un número de aplicaciones determinadas pero no al resto.
Por decir algo. Libreoffice, navegador y otras más. Digamos que las aplicaciones que realmente va utilizar.
O crear un usuario que tiene un uso del sistema "limitado".
Imaginar que es un niño.
Saludos
Shell 23-11-2021, 22:34
Buenas!
Hice un ejemplo para buscar en el contol listbox.
He usado dos controles, una caja de texto y un listbox.
He creado tres ejemplos.
Código Común:
Primer ejemplo. Busca y muestra una coincidencia.
![[Imagen: 7dxuHqa.png]](https://i.imgur.com/7dxuHqa.png)
Segundo Ejemplo. Busca y muestra una coincidencia.
Estoy interesado en este ya que usa una constante gb.like. El efecto cuando busca no siempre es correcto.
Imaginar que busco elementos que comienzan con la "z", pues hay veces que si hay más de una coincidencia, se salta el primero.
El problema se encuentra en la constante que usa el método "find". O que no lo uso de una forma correcta.
![[Imagen: U8d1Dwb.png]](https://i.imgur.com/U8d1Dwb.png)
Se ha saltado el primero.
Tercer ejemplo, muestra todos los elementos que coinciden con el texto que busco.
Os subo el ejemplo. Tiene tres formularios, seleccionar uno de ellos y o bien ejecutarlo como correr esta clase ó como clase de inicio.
Saludos
Hice un ejemplo para buscar en el contol listbox.
He usado dos controles, una caja de texto y un listbox.
He creado tres ejemplos.
Código Común:
Código:
Public Const NUMDEELEMENTOS As Integer = 100
Public valores As String[]
Public Sub LlenadoDelista() As String[]
Dim n As Integer
Dim i As Integer
Dim nom As String
Dim acadenas As New String[]
For i = 0 To NUMDEELEMENTOS
For n = 0 To 2
nom &= Chr(Rand(65, 90))
Next
nom &= Format(Rand(1, 100), "000")
acadenas.Add(nom)
nom = ""
Next
Return acadenas
EndPrimer ejemplo. Busca y muestra una coincidencia.
Código:
Public Sub Form_Open()
Me.Text = "Busqueda en ListBox"
lstElementos.List = Comun.LlenadoDelista()
lstElementos.Sorted = True
Comun.valores = lstElementos.List
txtEntrada.SetFocus()
End
Public Sub txtEntrada_Change()
Dim x As Integer
Dim coincidencia As Boolean
txtEntrada.Text = UCase(txtEntrada.Text)
lstElementos.List = Comun.valores
If Not IsNull(txtEntrada.Text) Then
While x < lstElementos.count And Not coincidencia
If InStr(Trim(Left(lstElementos[x].Text, Len(txtEntrada.text))), Trim(txtEntrada.Text)) <> 0 Then
lstElementos.Index = x
coincidencia = True
Endif
If Not coincidencia Then x += 1
Wend
Endif
EndSegundo Ejemplo. Busca y muestra una coincidencia.
Estoy interesado en este ya que usa una constante gb.like. El efecto cuando busca no siempre es correcto.
Imaginar que busco elementos que comienzan con la "z", pues hay veces que si hay más de una coincidencia, se salta el primero.
El problema se encuentra en la constante que usa el método "find". O que no lo uso de una forma correcta.
Se ha saltado el primero.
Código:
Public Sub Form_Open()
Me.Text = "Busqueda en ListBox"
lstElementos.Sorted = True
lstElementos.List = Comun.LlenadoDelista()
Comun.valores = lstElementos.List
txtEntrada.SetFocus()
End
Public Sub txtEntrada_Change()
txtEntrada.Text = Trim(UCase(txtEntrada.Text))
lstElementos.List = Comun.valores
If Not IsNull(txtEntrada.text) Then lstElementos.Index = lstElementos.Find(txtEntrada.text & "*", gb.Like) 'No funciona siempre correctamente
EndTercer ejemplo, muestra todos los elementos que coinciden con el texto que busco.
Código:
Public Sub Form_Open()
Me.Text = "Busqueda en ListBox"
lstElementos.List = Comun.LlenadoDelista()
lstElementos.Sorted = True
Comun.valores = lstElementos.List
txtEntrada.SetFocus()
End
Public Sub txtEntrada_Change()
Dim x As Integer
Dim listaencontrados As New String[]
txtEntrada.Text = UCase(txtEntrada.Text)
lstElementos.List = Comun.valores
If Not IsNull(txtEntrada.text) Then
If lstElementos.Count > 0 Then
For x = 0 To lstElementos.Count - 1
If InStr(Left(lstElementos[x].Text, Len(txtEntrada.Text)), txtEntrada.Text) > 0 Then
lstElementos.Index = x
listaencontrados.Add(lstElementos[lstElementos.Index].Text)
Endif
Next
lstElementos.List = listaencontrados
Else
lstElementos.Index = -1
Endif
Endif
EndOs subo el ejemplo. Tiene tres formularios, seleccionar uno de ellos y o bien ejecutarlo como correr esta clase ó como clase de inicio.
Saludos
Archivos adjuntos
Bienvenido, Invitado
Últimos temas
Problema con el repósito ...
Foro: InstalaciónÚltimo mensaje por: guizans, 14-04-2026, 21:38
Respuestas: 2 - Vistas: 340
UEFI y BIOS
Foro: Hardware & IoTÚltimo mensaje por: guizans, 13-04-2026, 21:22
Respuestas: 3 - Vistas: 2,503
Visual Studio Code con Ga...
Foro: GeneralÚltimo mensaje por: guizans, 07-03-2026, 14:24
Respuestas: 2 - Vistas: 727
WebForm con mysql gridvie...
Foro: WebApp/WebFormsÚltimo mensaje por: vjarvelo, 03-03-2026, 16:32
Respuestas: 2 - Vistas: 3,376
Sobre la proteccion del c...
Foro: GeneralÚltimo mensaje por: Shordi, 19-02-2026, 11:07
Respuestas: 7 - Vistas: 1,310