VISUAL BASIC 4EVAR

DIM THISTHREAD AS STRING
DIM NUMBER AS INTEGER

IF THISTHREAD = SUCKS THEN
     MSGBOX("PENIS",VBYESNO,"MESSAGE")
ELSE
     FOR NUMBER = 1 TO 10
          NUMBER=1
     NEXT
END IF

    

SUCKS is undefined