Shordi 11-06-2022, 12:53
Aquí tenéis un combobox que se rellena con la lista de opciones según se va tecleando sobre él.
No funciona como yo deseaba, que era el mismo comportamiento pero con la lista del combobox desplegada, pero bueno, vale, cumple su función.

No lo he probado demasiado por lo que no estoy seguro de que se comporte de manera adecuada en todas las ocasiones por lo que agradecería que, si estáis interesado, le echéis un vistazo, lo probéis y me contéis los fallos o sugerencias.

Saludos.
Archivos adjuntos
.gz
ComboList-0.0.1.tar.gz (Tamaño: 13.03 KB Descargas: 6)
Shell 10-06-2022, 19:43
Buenas!.

Viendo una aplicación, veía que se repetía mucho código, un procedimiento por cada opción, cuanta mas opciones había,
más procedimiento, más código. Confused

Y me animé a ver el problema. ¿ Y por qué no se crea un código común con distinta salida ?. Me acordé de una matriz de controles.
Aprovechar las propiedades del objeto Menú.

Desde código es algo como esto: Puede que eso sea más complejo.

Código:
Public Sub Form_Open()
 
  Dim h1 As Menu
  Dim h2 As Menu
  Dim h3 As Menu
 
  h1 = New Menu(Me)
  h1.Text = "Opciones"
 
  h2 = New Menu(h1) As "Opcion"
  With h2
    .Text = "Opcion 1"
    .Tag = 0    
  End With
 
  h3 = New Menu(h1) As "Opcion"
  With h3
    .Text = "Opcion 2"
    .Tag = 1
  End With
 
End

Public Sub Opcion_Click()
 
  Dim quehacer As String
 
  Select Case Last.tag
      
    Case 0
      quehacer = "caminar"      
    Case 1
      quehacer = "correr"
  End Select
 
  Message.Info("La " & Last.text & " es " & quehacer)
 
End

Y luego lo hice desde el editor de menús.
Imagen con una de las opciones.

[Imagen: 90lQlps.png]

Cuando usaba los menús, no usaba grupos ni tags. Y luego viendo un código de un compañero, ostras cuanto código.

Subo el ejemplo.

Saludos
Archivos adjuntos
.gz
EjemploConMenu-0.0.1.tar.gz (Tamaño: 12.01 KB Descargas: 1)
Shell 10-06-2022, 19:32
Buenas!.

Estaba creando un archivo fuente para subirlo a la comunidad y vi esta opción, se encuentra abajo del todo.

[Imagen: rFeLRxH.png]

Traducir la última parte "archive that fools GMail". Ahora nos dedicamos a volver loco a GMail ?.  Rolleyes

¿ Entonces ahora, convierte el archivo fuente a un texto embebido dentro de un mail ?. Suele ocupar más.

Saludos
Páginas (571):    1 307 308 309 310 311 571   
Bienvenido, Invitado
Tienes que registrarte para poder participar en nuestro foro.
Recordarme?
Miembros: 310
Último miembro: MARQUITOS6767
Temas del foro: 1,761
Mensajes del foro: 9,153
Últimos temas
Problema con el repósito ...
Foro: Instalación
Último mensaje por: guizans, 14-04-2026, 21:38
Respuestas: 2 - Vistas: 333
UEFI y BIOS
Foro: Hardware & IoT
Último mensaje por: guizans, 13-04-2026, 21:22
Respuestas: 3 - Vistas: 2,499
Visual Studio Code con Ga...
Foro: General
Último mensaje por: guizans, 07-03-2026, 14:24
Respuestas: 2 - Vistas: 719
WebForm con mysql gridvie...
Foro: WebApp/WebForms
Último mensaje por: vjarvelo, 03-03-2026, 16:32
Respuestas: 2 - Vistas: 3,374
Sobre la proteccion del c...
Foro: General
Último mensaje por: Shordi, 19-02-2026, 11:07
Respuestas: 7 - Vistas: 1,308
Powered By MyBB, © 2002-2026 MyBB Group.
Made with by Curves UI.