ComedyCode.com
Home Categories Languages Random New Popular Links
Search 

Share This Code!
Send this code to a friend!

ComedyCode of the Week
Check out this week's highlighted snippet!

New Here?
Create an account and become a ComedyCoder today!




May 13, 2008

Getting Ready For Work

    Public Sub Before_Work()
        Using Bathroom As PrivateDomain = Mine
            Shower()
            Shave()
        End Using
        Dress(Clothing)
        Do
            Dress(Tie)
        Loop Until Wife(ApprovesTie)
        Grab(Coat)
        Grab(Briefcase)
        GoTo StarBucks
StarBucks:
        If Barrista Is OutOfCoffee Then
            Panic()
            Order(Chai)
            HopeFor(TheBest)
        Else
            Order(Coffee)
        End If
        GoTo Work
Work:
        ParkNear(Building)
        Juggle(Coffee, Briefcase, Coat)
        ArriveAt(Desk)
    End Sub


Coded by: CaptainJack (2)
View other ComedyCode by this comedycoder.
Send this comedycoder a message.
Submitted on: April 17, 2008
Category: Business
Show me more Business snippets.
Programming language: Visual Basic
Show me more Visual Basic snippets.
Viewed by: 148 unique visitors


Ratings & Comments

This snippet has not yet been rated.


» Submit Code
» Login

Rate This Code!

Login or create an account.




Copyright © 2001-2004 - N-VisionIT Interactive
Website Design, Development & Hosting by N-VisionIT Interactive