pro4

sintassi per inserimento dati INPUT e visualizzazione OUTPUT

TURBO PASCAL

Readln(x)..............................associa a x il dato fornito
write('scrivi un numero=');readln(y);..associa a y il dato fornito
writeln(x).............................visualizza il valore di x
somma:=x+y
writeln(somma).........................visualizza il valore di somma
writeln('somma=',somma)................visualizza il valore di somma


Run e visualizza risultato

5
inserisci numero=8
somma=13

VBA di EXCEL
Private Sub CommandButton1_Click()
Dim x As Integer
Dim y As Integer
'assegna alla variabile x il valore presente nella cella(r,c)
x = Cells(1, 1)
y = x * 5
'visualizza nella cella(r,c) il valore associato alla variabile y
Cells(2, 1) = y
End Sub

VISUAL BASIC
Private Sub CommandButton1_Click()
Dim x As Integer
Dim y As Integer
Dim a As Integer
'assegna il valore 10 a textbox1.text
TextBox1.Text = 10
'assegna il valore 9 a label1.caption
Label1.Caption = 9
'associa alla variabile il valore presente in textbox o label
'associa il valore di textbox1.text alla variabile x
x = TextBox1
'associa il valore di label1 alla variabile y
y = Label1
'visualizza i valori x y in textbox2 e label2
TextBox2.Text = x
Label2.Caption = y
'visualizza in MsgBox il prodotto a=x*y
a = x * y
MsgBox (a)
End Sub

*****************************************************************

readln(x)....cells(r,c)=x.....textbox.text=x......label.caption=x.....INPUT(x)

writeln(x)...x=cells(r,c).....x=textbox.text......x=label.caption.....PRINT(x)

*****************************************************************

inizio