codice visual basic

fasi operative per creare programmi in visual basic utilizzando
codici forniti e immagine oggetti necessari

copiare e inserire programma visual basic

vengono forniti i listati del programma in visual basic
e una immagine che indica gli oggetti da creare
fase operativa:
copiare (es. su notes) il listato del programma fornita su pagina htm(
prova1pro.htm)
aprire powerpoint-editor visual basic-userform vuoto
creare gli oggetti che sono visualizzati nel disegno
(eventualmente cercare di riconoscere gli oggetti anche leggendo il codice)
inserire testi informativi (non essenziali)
aprire Visualizza codice e copiare il codice dal notes
attivare programma con Esegui-Esegui UserForm

attivare esempio ppt


listato del programma copiato file.htm in rete(prova1pro.htm)
Private Sub UserForm_Click()
Dim numero As Double
numero = TextBox1
Label1.Caption = numero * 10
End Sub

vedi esempio più complesso
(per modifica a proprietà oggetti vedi anche
visax.htm)

dalla immagine si vede che si deve creare un pulsante da rinominare :calcolare
una
casella di testo (il codice indicherà il nome da assegnare:cifra)
tre etichette per inserire risultato (label1,label2,label3 poi modificato)
(il codice indicherà il nome da assegnare:
calcola1,calcola2,calcola3)
quattro altre etichette per inserire testo informativo (il codice indicherà il nome da assegnare:
(immutato
label1,label2,label3,label4) non compare nel codice

immagine del form attivato

Rem calcolo area con raggio da inserire e raggi forniti:codice

Function area(raggio As Double) As Double
area = raggio * raggio * 3.14
End Function
Private Sub
calcolare_Click() (pulsante)
Dim n As Double
Dim area1 As Double
Dim area2 As Double
Dim area3 As Double
n =
cifra (casella di testo)
area1 = area(n)
area2 = area(10)
area3 = area(100)
calcola1.Caption = area1 (label1 > calcola1)
calcola2.Caption = area2 (label2 >calcola2)
calcola3.Caption = area3 (label3 > calcola3)
End Sub

altro esempio