'Listing 21.3 -- 21LIST03.TXT Operator Not

Private Sub Command1_Click()
  W = 15
  X = 7
  Y = 5
  Result = Not W > X
  Form1.Print Spc(3); "Not W > X" & Result
  Result = Not X > Y
  Form1.Print Spc(3); "Not X > Y" & Result
End Sub
