Last example:
Code:
   Select Case X
          
          Case 5 To 20
               Col_Loc = 0
               Cur_PosX = 5
               Str_Day = "Sunday"
          
          Case 28 To 43
               Col_Loc = 1
               Cur_PosX = 28
               Str_Day = "Monday"
          
          Case 51 To 66
               Col_Loc = 2
               Cur_PosX = 51
               Str_Day = "Tuesday"
          
          Case 74 To 89
               Col_Loc = 3
               Cur_PosX = 74
               Str_Day = "Wednesday"
    
          Case 97 To 112
               Col_Loc = 4
               Cur_PosX = 97
               Str_Day = "Thursday"
               
          Case 120 To 135
               Col_Loc = 5
               Cur_PosX = 120
               Str_Day = "Friday"
    
          Case 143 To 166
               Col_Loc = 6
               Cur_PosX = 143
               Str_Day = "Saturday"
   End Select
Procedure taken from a calendar program that I made few months back relies totally on Select Case to do the job. Extremely tidy & extremely fast!
<br/>