Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Creare una TextBox tramite un ComandButton - Creare una Textbox con un Cmd.frm

Creare una Textbox con un Cmd.frm

Caricato da: Roberto VB
Scarica il programma completo

  1. Private Sub Command1_Click()
  2. Dim Text As TextBox
  3. Set Text = Form1.Controls.Add("VB.TextBox", "AReallyNewTextBox")
  4. With Text
  5. 'Imposto la proprietà Visibile a True
  6. .Visible = True
  7. 'Imposto le dimensioni della TextBox
  8. .Height = 300
  9. .Width = 1000
  10. 'Imposto il contenuto
  11. .Text = "Ciao"
  12. 'Imposto il Font
  13. .Font.Name = "Arial"
  14. End With
  15. End Sub