Los foros del Guille

Regálate mi libro de Visual Basic 2005
Todo lo explicado es para .NET 2.0.
El complemento ideal para mi libro Novedades de Visual Basic 9.0

Si no encuentras respuesta, puedes buscar en el sitio del Guille

Google
 
Selecciona el foro y pulsa en mostrar:     Mostrar 
De tu interés (algunos de los avisos publicados)

14/ene/2006
En la página de inicio se muestra la bandera de tu país, o al menos debería mostrarse si es que tu dirección IP está en mi base de datos. Si no te muestra la bandera, seguramente se mostrará un link para que me digas que IP estás usando y de que país eres... si es así, te agradecería que me lo dijeras.
También puedes poner la imagen de la bandera de tu país en tus mensajes, aquí te explico como.

  Foro: VB6.General Cantidad:  Desde:   Hasta:    Aplicar   Responder 
Respuestas a: 58203 - Como ordenar un arreglo de Botones
IDAsuntoFechaNick 
58203 Como ordenar un arreglo de Botones07/03/18 17:31CentauroChile   
Amigos.. buenas tardes, tengo un arreglo que crea los botones de acuerdo a un parámetro que define el usuario, en este caso, son las mesas de un restaurante, por lo mismo, debo mostrárlas en una ventana para que el garzón pueda seleccionarla de manera rápida, mi problema es que los 50 botones salen en linea horizontal y necesito que se muestren en filas de 10.
Algo así como

Mesa Mesa Mesa Mesa Mesa Mesa Mesa Mesa Mesa Mesa
1 2 3 4 5 6 7 8 9 10

Mesa Mesa Mesa Mesa Mesa Mesa Mesa Mesa Mesa Mesa
11 12 13 14 15 16 17 18 19 20

y así hasta completar las lineas necesarias de 10 botones cada una.

Este es el código que estoy usando ahora:

For intTotalDeMesas = 1 To CantidadDeMesas

Load CmdMesasSeleccionada(intTotalDeMesas)
CmdMesasSeleccionada(intTotalDeMesas).Top = CmdMesasSeleccionada(intTotalDeMesas - 1).Top
CmdMesasSeleccionada(intTotalDeMesas).Move (CmdMesasSeleccionada(0).Width * intTotalDeMesas),
CmdMesasSeleccionada(0).Left
CmdMesasSeleccionada(intTotalDeMesas).Visible = True
CmdMesasSeleccionada(intTotalDeMesas).Caption = "Mesa: " & vbCrLf & (intTotalDeMesas) & "Index: " & Val(CmdMesasSeleccionada(intTotalDeMesas).Index)
CmdMesasSeleccionada(intCantidadrubros).Tag = CmdMesasSeleccionada(intTotalDeMesas).Index
Next

Saludos y muchas gracias de ante mano.

Saludos desde Chile

 
(c) Guillermo 'guille' Som, 2005-2018  - foros.elGuille v1.0.5.3 (23/Mar/2009 14:50 GMT +1)  - (ASP.NET 2.0 v2.0.50727.8799)
 
Usuarios activos: 25 - App. iniciada: 17/10/2018 5:40:41 GMT - La hora GMT del servidor es: 17/10/2018 06:56:03 GMT