Dr. Pannenkoek Posted April 4, 2010 Posted April 4, 2010 Merry Christmas easter everyone.I got a nice easter egg with 6 creme eggs. Quote
Nobana Posted April 4, 2010 Posted April 4, 2010 (edited) Yea, thats right. Edited April 4, 2010 by Nobana Quote
Darkstar Posted April 4, 2010 Posted April 4, 2010 (edited) Happy easter, and here's some code for me and Lindt Bunnies:Private Sub Form_Load() Dim LindtBunny As String Do Until LindtBunny = "Y" LindtBunny = InputBox("Do you have a Lindt Bunny?!?") Select Case LindtBunny Case LindtBunny = "Y" MsgBox ("OM NOM NOM. Bunny is deelecious!") Case LindtBunny = "N" MsgBox ("You. Sir. You fail.") Case LindtBunny = "" MsgBox ("don't try and get out of the question") Case Else MsgBox ("Broken program is broken") End Select Loop End SubAlthough at the moment it seems to only want to choose the Case Else option >: Edited April 4, 2010 by ERROR 401 Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.