|
-
Oct 20th, 2009, 10:49 AM
#1
Thread Starter
Fanatic Member
[RESOLVED] Select Case not catching the Case
Hi here is my code..
vb.net Code:
Private Sub GetResult()
Select Case Result Mod 43
Case 1
BaracodeData += "1"
CheckCharacter = "1"
Case 2
BaracodeData += "2"
CheckCharacter = "2"
Case 3
BaracodeData += "3"
CheckCharacter = "3"
Case 4
BaracodeData += "4"
CheckCharacter = "4"
Case 5
BaracodeData += "5"
CheckCharacter = "5"
Case 6
BaracodeData += "6"
CheckCharacter = "6"
Case 7
BaracodeData += "7"
CheckCharacter = "7"
Case 8
BaracodeData += "8"
CheckCharacter = "8"
Case 9
BaracodeData += "9"
CheckCharacter = "9"
Case 10
BaracodeData += "A"
CheckCharacter = "A"
Case 11
BaracodeData += "B"
CheckCharacter = "B"
Case 12
BaracodeData += "C"
CheckCharacter = "C"
Case 13
BaracodeData += "D"
CheckCharacter = "D"
Case 14
BaracodeData += "E"
CheckCharacter = "E"
Case 15
BaracodeData += "F"
CheckCharacter = "F"
Case 16
BaracodeData += "G"
CheckCharacter = "G"
Case 17
BaracodeData += "H"
CheckCharacter = "H"
Case 18
BaracodeData += "I"
CheckCharacter = "I"
Case 19
BaracodeData += "J"
CheckCharacter = "J"
Case 20
BaracodeData += "K"
CheckCharacter = "K"
Case 21
BaracodeData += "L"
CheckCharacter = "L"
Case 22
BaracodeData += "M"
CheckCharacter = "M"
Case 23
BaracodeData += "N"
CheckCharacter = "N"
Case 24
BaracodeData += "O"
CheckCharacter = "O"
Case 25
BaracodeData += "P"
CheckCharacter = "P"
Case 26
BaracodeData += "Q"
CheckCharacter = "Q"
Case 27
BaracodeData += "R"
CheckCharacter = "R"
Case 28
BaracodeData += "S"
CheckCharacter = "S"
Case 29
BaracodeData += "T"
CheckCharacter = "T"
Case 30
BaracodeData += "U"
CheckCharacter = "U"
Case 31
BaracodeData += "V"
CheckCharacter = "V"
Case 32
BaracodeData += "W"
CheckCharacter = "W"
Case 33
BaracodeData += "X"
CheckCharacter = "X"
Case 34
BaracodeData += "Y"
CheckCharacter = "Y"
Case 35
BaracodeData += "Z"
CheckCharacter = "Z"
Case 36
BaracodeData += "-"
CheckCharacter = "-"
Case 37
BaracodeData += "."
CheckCharacter = "."
Case 38
BaracodeData += "Sp"
CheckCharacter = "Sp"
Case 39
BaracodeData += "$"
CheckCharacter = "$"
Case 40
BaracodeData += "/"
CheckCharacter = "/"
Case 41
BaracodeData += "+"
CheckCharacter = "+"
Case 42
BaracodeData += "%"
CheckCharacter = "%"
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.
-
Oct 20th, 2009, 10:50 AM
#2
Thread Starter
Fanatic Member
Re: Select Case not catching the Case
umm actually it should be 0
-
Oct 20th, 2009, 10:51 AM
#3
Thread Starter
Fanatic Member
Re: Select Case not catching the Case
-
Oct 20th, 2009, 01:51 PM
#4
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.
-
Oct 23rd, 2009, 02:24 PM
#5
Thread Starter
Fanatic Member
Re: [RESOLVED] Select Case not catching the Case
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|