• Home
 · 
• String Manipulation
 · 
• Checks whether a given character is a punctuation character.

Checks whether a given character is a punctuation character.

Checks whether a given character is a punctuation character.

Rate Checks whether a given character is a punctuation character.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'select the first character just in case user passed more than one
Character = Left(Character, 1)

Select Case Asc(Character)
  Case 9, 10, 13, 32 To 37, 39 To 47, 58 To 64, 91 To 96, 123 To 126
     IsPunctuationChar = True
  Case Is > 126
     IsPunctuationChar = True
  Case Else
     IsPunctuationChar = False
End Select
End Function