'Listing 20.2 20LIST02.TXT  -- Wpyw nawiasw na kolejno oblicze.

Private Sub Command1_Click()
  Expr1 = 100
  Expr2 = 75
  Expr3 = 90
  Result = Expr1 - Expr2 + Expr3
  Result2 = Expr1 - (Expr2 + Expr3)
  Form1.Print "Wynik1 = " & Result
  Form1.Print "Wynik2 = " & Result2
End Sub
