Jhonjhon_123

Untitled

Jan 25th, 2012
118
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Option Explicit
  2.  
  3. Public variable As Long
  4.  
  5. Private Sub cmdCommand1_Click()
  6.  
  7. Static Cont As Long
  8.  
  9. Cont = Cont + 1 ' Para el ejemplo
  10.  
  11. ' Form es un nuevo formulario dinamico de Form1
  12. Dim Form As New Form1
  13.  
  14. Form.variable = Cont ' aquí puedes establecerle las variables que desees, modificar textbox, etc
  15. Form.Show ' aquí lo muestras finalmente
  16.  
  17. End Sub
  18.  
  19. Private Sub Form_Load()
  20. Me.Print variable
  21. End Sub
Advertisement
Add Comment
Please, Sign In to add comment