Results 1 to 5 of 5

Thread: [RESOLVED] Select Case not catching the Case

  1. #1

    Thread Starter
    Fanatic Member
    Join Date
    Sep 2005
    Location
    Toledo, OH
    Posts
    785

    Resolved [RESOLVED] Select Case not catching the Case

    Hi here is my code..


    vb.net Code:
    1. Private Sub GetResult()
    2.         Select Case Result Mod 43
    3.             Case 1
    4.                 BaracodeData += "1"
    5.                 CheckCharacter = "1"
    6.             Case 2
    7.                 BaracodeData += "2"
    8.                 CheckCharacter = "2"
    9.             Case 3
    10.                 BaracodeData += "3"
    11.                 CheckCharacter = "3"
    12.             Case 4
    13.                 BaracodeData += "4"
    14.                 CheckCharacter = "4"
    15.             Case 5
    16.                 BaracodeData += "5"
    17.                 CheckCharacter = "5"
    18.             Case 6
    19.                 BaracodeData += "6"
    20.                 CheckCharacter = "6"
    21.             Case 7
    22.                 BaracodeData += "7"
    23.                 CheckCharacter = "7"
    24.             Case 8
    25.                 BaracodeData += "8"
    26.                 CheckCharacter = "8"
    27.             Case 9
    28.                 BaracodeData += "9"
    29.                 CheckCharacter = "9"
    30.             Case 10
    31.                 BaracodeData += "A"
    32.                 CheckCharacter = "A"
    33.             Case 11
    34.                 BaracodeData += "B"
    35.                 CheckCharacter = "B"
    36.             Case 12
    37.                 BaracodeData += "C"
    38.                 CheckCharacter = "C"
    39.             Case 13
    40.                 BaracodeData += "D"
    41.                 CheckCharacter = "D"
    42.             Case 14
    43.                 BaracodeData += "E"
    44.                 CheckCharacter = "E"
    45.             Case 15
    46.                 BaracodeData += "F"
    47.                 CheckCharacter = "F"
    48.             Case 16
    49.                 BaracodeData += "G"
    50.                 CheckCharacter = "G"
    51.             Case 17
    52.                 BaracodeData += "H"
    53.                 CheckCharacter = "H"
    54.             Case 18
    55.                 BaracodeData += "I"
    56.                 CheckCharacter = "I"
    57.             Case 19
    58.                 BaracodeData += "J"
    59.                 CheckCharacter = "J"
    60.             Case 20
    61.                 BaracodeData += "K"
    62.                 CheckCharacter = "K"
    63.             Case 21
    64.                 BaracodeData += "L"
    65.                 CheckCharacter = "L"
    66.             Case 22
    67.                 BaracodeData += "M"
    68.                 CheckCharacter = "M"
    69.             Case 23
    70.                 BaracodeData += "N"
    71.                 CheckCharacter = "N"
    72.             Case 24
    73.                 BaracodeData += "O"
    74.                 CheckCharacter = "O"
    75.             Case 25
    76.                 BaracodeData += "P"
    77.                 CheckCharacter = "P"
    78.             Case 26
    79.                 BaracodeData += "Q"
    80.                 CheckCharacter = "Q"
    81.             Case 27
    82.                 BaracodeData += "R"
    83.                 CheckCharacter = "R"
    84.             Case 28
    85.                 BaracodeData += "S"
    86.                 CheckCharacter = "S"
    87.             Case 29
    88.                 BaracodeData += "T"
    89.                 CheckCharacter = "T"
    90.             Case 30
    91.                 BaracodeData += "U"
    92.                 CheckCharacter = "U"
    93.             Case 31
    94.                 BaracodeData += "V"
    95.                 CheckCharacter = "V"
    96.             Case 32
    97.                 BaracodeData += "W"
    98.                 CheckCharacter = "W"
    99.             Case 33
    100.                 BaracodeData += "X"
    101.                 CheckCharacter = "X"
    102.             Case 34
    103.                 BaracodeData += "Y"
    104.                 CheckCharacter = "Y"
    105.             Case 35
    106.                 BaracodeData += "Z"
    107.                 CheckCharacter = "Z"
    108.             Case 36
    109.                 BaracodeData += "-"
    110.                 CheckCharacter = "-"
    111.             Case 37
    112.                 BaracodeData += "."
    113.                 CheckCharacter = "."
    114.             Case 38
    115.                 BaracodeData += "Sp"
    116.                 CheckCharacter = "Sp"
    117.             Case 39
    118.                 BaracodeData += "$"
    119.                 CheckCharacter = "$"
    120.             Case 40
    121.                 BaracodeData += "/"
    122.                 CheckCharacter = "/"
    123.             Case 41
    124.                 BaracodeData += "+"
    125.                 CheckCharacter = "+"
    126.             Case 42
    127.                 BaracodeData += "%"
    128.                 CheckCharacter = "%"
    129.  
    130.  
    131.         End Select


    If the result is 86 and it's mod by 43 the answer is 2

    Case 2 is not firing. it just goes to the end of the procedure.

  2. #2

    Thread Starter
    Fanatic Member
    Join Date
    Sep 2005
    Location
    Toledo, OH
    Posts
    785

    Re: Select Case not catching the Case

    umm actually it should be 0

  3. #3

    Thread Starter
    Fanatic Member
    Join Date
    Sep 2005
    Location
    Toledo, OH
    Posts
    785

    Re: Select Case not catching the Case

    so nevermind

  4. #4
    Master Of Orion ForumAccount's Avatar
    Join Date
    Jan 2009
    Location
    Canada
    Posts
    2,802

    Re: [RESOLVED] Select Case not catching the Case

    This is something entirely different from your original topic but you should avoid prefixing a sub routine with "Get" because it implies the procedure will return a value.

  5. #5

    Thread Starter
    Fanatic Member
    Join Date
    Sep 2005
    Location
    Toledo, OH
    Posts
    785

    Re: [RESOLVED] Select Case not catching the Case

    Noted.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width