|
|
#1 (permalink) |
![]() Fecha de Ingreso: abril-2006
Mensajes: 5
|
Creacion de Objetos
|
|
|
|
|
|
#2 (permalink) |
![]() Fecha de Ingreso: mayo-2006
Mensajes: 71
|
Haz un command button y establece propiedades
Name=Cmd Index=0 Visible=false Coloca otro boton, y en el codigo pon esto
Cita:
Dim S As Integer
Private Sub Command1_Click() S = S + 1 Load Cmd(S) Cmd(S).Visible = True Cmd(S).Top = Cmd(0).Top + 500 * S End Sub Private Sub Form_Load() S = 0 End Sub |
|
|
|