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