testo1
esempio di
utilizzazione delle proprietà Caption, Text, Additem
con oggetti indicati dalla immagine e con nomi automatici
creare oggetti con
nome indicato (cfr.immagine e codice)
ricopiare e incollare il codice in form e poi cliccare
Private Sub UserForm_Click()
Rem utilizzo di Caption e Text e Additem per inserimento testo
Label1.Caption = "testo da
codice"
TextBox1.Text = "testo da
codice"
ComboBox1.AddItem ("testo da
codice")
ListBox1.AddItem ("testo da
codice")
CheckBox1.Caption = "testo da
codice"
OptionButton1.Caption = "testo
da codice"
ToggleButton1.Caption = "testo
da codice"
Frame1.Caption = "testo da
codice"
CommandButton1.Caption = "testo
da codice"
End Sub
creare oggetti
indicati da immagine e codice , con dimensione e posizione
casuale:
verranno dimensionati e posizionati mediante codice e proprietà
Left, Top, Height,
Width
Private Sub UserForm_Click()
Rem utilizzo di Caption e Text e Additem per inserimento testo
Rem e dimensionamento e localizzazione
UserForm1.Caption = "finestra principale"
UserForm1.Width = 400
UserForm1.Height = 450
Label1.Height = 30
Label1.Width = 80
Label1.Left = 10
Label1.Top = 10
Label1.Caption = "testo da codice"
TextBox1.Top = 60
TextBox1.Left = 10
TextBox1.Height = 40
TextBox1.Width = 80
TextBox1.Text = "testo da codice"
ComboBox1.Left = 10
ComboBox1.Top = 110
ComboBox1.Height = 40
ComboBox1.Width = 80
ComboBox1.AddItem ("testo da codice")
ListBox1.Left = 10
ListBox1.Top = 170
ListBox1.Height = 40
ListBox1.Width = 80
ListBox1.AddItem ("testo da codice")
Frame1.Left = 10
Frame1.Top = 240
Frame1.Height = 40
Frame1.Width = 80
Frame1.Caption = "testo da codice"
CommandButton1.Left = 10
CommandButton1.Top = 300
CommandButton1.Height = 30
CommandButton1.Width = 80
CommandButton1.Caption = "testo da codice"
End Sub
creare oggetti
indicati da immagine e codice , con dimensione e posizione
casuale:
verranno dimensionati e posizionati mediante codice e proprietà
Left, Top, Height,
Width
e formattati e colorati mediante codice
Rem utilizzo di Caption e Text e Additem per inserimento testo
Rem e dimensionamento e localizzazione
Rem formattazione colore
UserForm1.Caption = "finestra principale"
UserForm1.Width = 400
UserForm1.Height = 450
Label1.Height = 30
Label1.Width = 80
Label1.Left = 10
Label1.Top = 10
Label1.Caption = "testo da codice"
Label1.BackColor = vbCyan
Label1.ForeColor = vbRed
TextBox1.Top = 60
TextBox1.Left = 10
TextBox1.Height = 40
TextBox1.Width = 80
TextBox1.Text = "testo da codice"
TextBox1.BackColor = vbYellow
TextBox1.ForeColor = vbBlue
ComboBox1.Left = 10
ComboBox1.Top = 110
ComboBox1.Height = 40
ComboBox1.Width = 80
ComboBox1.AddItem ("testo da codice")
ComboBox1.BackColor = vbCyan
ComboBox1.ForeColor = vbRed
ListBox1.Left = 10
ListBox1.Top = 170
ListBox1.Height = 40
ListBox1.Width = 80
ListBox1.AddItem ("testo da codice")
ListBox1.BorderColor = vbRed
ListBox1.BackColor = vbCyan
ListBox1.BorderStyle = fmBorderStyleSingle
ListBox1.ForeColor = vbBlue
Frame1.Left = 10
Frame1.Top = 240
Frame1.Height = 40
Frame1.Width = 80
Frame1.Caption = "testo da codice"
Frame1.BackColor = vbCyan
Frame1.ForeColor = vbRed
CommandButton1.Left = 10
CommandButton1.Top = 300
CommandButton1.Height = 30
CommandButton1.Width = 80
CommandButton1.Caption = "testo da codice"
End Sub
per vedere presentazione powerpoint testo1.ppt testo2.ppt testo3.ppt