• Home
 · 
• String Manipulation
 · 
• Switch Case

Switch Case

Did you know that the capital letters are different from the small letters only by one bit?
A = 01000001 while a = 01100000 the 3rd bit is the capitalization

Rate Switch Case

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub Form_Load()
 MsgBox SwitchCase("Sex") 'returns sEX
End Sub
Function SwitchCase(Text As String) As String
 Dim i&, out$
 For i = 1 To Len(Text)
   out = out & Chr(Asc(Mid(Text, i, 1)) Xor 32)
 Next
 SwitchCase = out
End Function