Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Program to read my wifes mind...
Message
From
22/07/2002 13:01:14
 
 
To
19/07/2002 15:37:01
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00680594
Message ID:
00681222
Views:
14
DO WHILE .T.
FOR i = 1 TO 3
DO CASE
CASE i = 1
= THISFORM.BuyWife("Candy")
CASE i = 2
= THISFORM.BuyWife("Flowers")
CASE i = 3
= THISFORM.BuyWife("Diamonds")
OTHERWISE
= THISFORM.SellWife()
ENDCASE
ENDFOR
ENDDO
Gordon de Rouyan
DC&G Consulting
Edmonton, Alberta
Email: derouyag@shaw.ca
Previous
Reply
Map
View

Click here to load this message in the networking platform