1. We have moved from vBulletin to XenForo and you are viewing the site in the middle of the move. Though the functional aspect of everything is working fine, we are still working on other changes including the new design on Xenforo.
    Dismiss Notice

A Programmer's Reference for Excuses

Discussion in 'Chit Chat' started by pradeep, Mar 30, 2007.

  1. pradeep

    pradeep Team Leader

    Code:
    Private Function getProgrammerExcuse() As String
         
          Dim myExcuses(1 to 21) As String
         
          myExcuses(1) =  "That's Weird...",
          myExcuses(2) =     "It's never done that before.",
          myExcuses(3) =     "It worked yesterday.",
          myExcuses(4) =     "How is that possible?",
          myExcuses(5) =     "It must have a hardware problem.",
          myExcuses(6) =     "What did you type in wrong to get it to crash." ,
          myExcuses(7) =     "There is something funky in your data",
          myExcuses(8) =     "I haven't touched that module in weeks!" ,
          myExcuses(9) =     "You must have wrong version.",
          myExcuses(10) =     "It's just some unlucky coincidence." ,
          myExcuses(11) =     "I can't test everything!",
          myExcuses(12) =     "THIS can't be the source of THAT." ,
          myExcuses(13) =     "It works, but it's not been tested." ,
          myExcuses(14) =     "Somebody must have changed my code.",
          myExcuses(15) =     "Did you check for a virus on your system?",
          myExcuses(16) =     "Even though it doesnt work, how does it feel?" ,
          myExcuses(17) =     "You cant use that version on your system.",
          myExcuses(18) =     "Why do you want to do it that way?",
          myExcuses(19) =     "Where were you when the program blew up?",
          myExcuses(20) =     "I thought I fixed that.",
          myExcuses(21) =     "This is not a bug,its undocumented feature."
         
          Dim randomChoice As New Random(UBound(myExcuses))
          Dim iRandomChoice As Integer = randomChoice.Next()
         
          Return myExcuses(iRandomChoice)
         
         End Function
     

Share This Page