Autor
Código:
Private Sub Command1_Click()
Call Command3_Click
End Sub
Private Sub Command2_Click()
Call Command4_Click
End Sub
Private Sub Command3_Click()
' si hubiera sido llamo de el boton 1 q el box sea 1, y si fuera por el 2 pues 2
MsgBox
End Sub
tmb podria es coger y poner en total 4 botones, pero m gustaria ahorrar codigo. con 4 seria asi
Código:
Private Sub Command1_Click()
Call Command3_Click
End Sub
Private Sub Command2_Click()
Call Command4_Click
End Sub
Private Sub Command3_Click()
MsgBox "1"
End Sub
Private Sub Command4_Click()
MsgBox "2"
End Sub
En línea
