pro21

gestione variabili indicizzate

VISUAL BASIC creare PULSANTE per istruzioni e 10 label e 2 textbox

Private Sub CommandButton1_Click()
'crea vettori con 2 elementi '
Dim intero(2) As Integer
Dim testo(2) As String
Dim numero(2) As Integer

'assegna valore alle variabili '
intero(1) = Label1.Caption
intero(2) = Label2.Caption
testo(1) = Label3.Caption
testo(2) = Label4.Caption

'visualizza valori delle variabili integer'
Label5.Caption = intero(1)
Label6.Caption = intero(2)
Label7.Caption = testo(1)
Label8.Caption = testo(2)
'richiede e poi visualizza numeri interi'
numero(1) = TextBox1.Text
numero(2) = TextBox2.Text
Label9.Caption = numero(1)
Label10.Caption = numero(2)
End Sub

inserire i dati in label1,label2,label3,label4 e in textbox1,textbox2:cliccare PULSANTE

inizio