formato2

esercitazione con visual basic su powerpoint
diverso modo di visualizzare i dati usando & e vbCrLf

Option Explicit
Dim a As Integer

Private Sub commandbutton1_Click()
Dim a As Integer
Dim somma As Integer
Dim b As Single
somma = 0
For a = 0 To 10
somma = somma + a
Label1.Caption = Label1.Caption & a & ".."
Label2.Caption = Label2.Caption & "numero= " & a & vbCrLf 'interlinea numeri a
Label3.Caption = Label3.Caption & "somma= " & somma & vbCrLf 'interlinea somme consecutive
Next a
End Sub

vedi formato2.ppt