Como llamo a un boton (1 vez...)

Iniciado por Petro_Boca, 9 Septiembre 2010, 01:30 AM

0 Miembros y 1 Visitante están viendo este tema.

Petro_Boca

como puedo hacer para llamar a un boton desde el form ?

osea, q el boton se autoejecute junto con el form

ya probe con :

call command2_click

pero ese abre el boton por cada milimetro q muevo el maus :S

aaronduran2

Si se abre cuando mueves el ratón, es porque pusiste el procedimiento en el evento MouseMove, en vez de ponerlo en Form_Load.

Un saludo

Petro_Boca

Cita de: aaronduran2 en  9 Septiembre 2010, 01:36 AM
Si se abre cuando mueves el ratón, es porque pusiste el procedimiento en el evento MouseMove, en vez de ponerlo en Form_Load.

Un saludo

es verdad...
Código (vb) [Seleccionar]

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)



pero si cambio Private Sub Form_MouseMove por Private Sub Form_Load...

andara?


aaronduran2

Sí que funciona... Al menos a mí sí.

Código (vb) [Seleccionar]
Private Sub Command1_Click()
    MsgBox "Hola"
End Sub

Private Sub Form_Load()
    Call Command1_Click
End Sub

Petro_Boca

Cita de: aaronduran2 en  9 Septiembre 2010, 01:40 AM
Sí que funciona... Al menos a mí sí.

Código (vb) [Seleccionar]
Private Sub Command1_Click()
    MsgBox "Hola"
End Sub

Private Sub Form_Load()
    Call Command1_Click
End Sub


asi no..

Código (vb) [Seleccionar]


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
TODO EL CODIGO
    Call Command1_Click

    End Sub



ASI SI.

Código (vb) [Seleccionar]


Private Sub Form_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
TODO EL CODIGO
    End Sub

   Private Sub form_load()
   
   Call Command2_Click
   
    End Sub



osea, me habias entendido mal :P

pero ya fue, dejalo ahi xd

Petro_Boca

osea yo no sabia q se podian poner 2 cosas (nose como se llaman, si alguien me lo dice...) con "Form"

osea, como ya tenia el Form_MouseMove, no sabia q lo podia cerrar y abrir el form_load

_katze_

private sub form_load()
boton
end sub

sub boton()
msgbox "hola"
end sub


-----------------------------
hacelo asi no llames al boton y si queres dentro del boton para usarlo luego coloca asi
private sub command1_click()
boton
end sub
y listo te ahorras en llamar al boton !