BCX Console Demonstration Program s25.bas

 DIM a$
 DIM b$
 
 INPUT "Enter a value for a$ ", a$
 
 INPUT "Enter a value for b$ ", b$
 
 IF a$ = b$ OR a$ = b$ OR a$ = b$  THEN ? "Passed case 1"
 
 IF a$ <> b$ OR a$ <> b$ OR a$ <> b$  THEN ? "Passed case 2"