¿Por qué no visualizo los botones?
Publicado por Carlos (78 intervenciones) el 30/03/2007 13:52:16
Tego el siguiente código:
........................
While Not (EOF(1))
y += 18
sil = Microsoft.VisualBasic.LineInput(1)
Dim b As New boton
b.Left = x : b.Top = y : b.Text = sil
b.indice = i : b.columna = c : b.fila = f
b.Width = 25 : b.Height = 18
If y = 18 * 18 Then y = 0 : x += 25
b.Visible = True
End While
La clase boton está ya definida(es subclase de la clase button)...
El problema es: ¿Por qué no visualizo ningún botón? He verificado que al ejecutar el programa, llega a este código.
¿Qué hago mal?
No me da ningún error.
Gracias
........................
While Not (EOF(1))
y += 18
sil = Microsoft.VisualBasic.LineInput(1)
Dim b As New boton
b.Left = x : b.Top = y : b.Text = sil
b.indice = i : b.columna = c : b.fila = f
b.Width = 25 : b.Height = 18
If y = 18 * 18 Then y = 0 : x += 25
b.Visible = True
End While
La clase boton está ya definida(es subclase de la clase button)...
El problema es: ¿Por qué no visualizo ningún botón? He verificado que al ejecutar el programa, llega a este código.
¿Qué hago mal?
No me da ningún error.
Gracias
Valora esta pregunta


0