Sapere se una stringa è formata soltanto da caratteri alfanumerici

Per sapere se una stringa è formata da soli caratteri alfanumerici, ossia dai caratteri che rappresentano:

• le unità numeriche (da "0" a "9");
• le lettere dell'alfabeto inglese maiuscole (da "A" a "Z") e minuscole (da "a" a "z");
• le lettere con segni diacritici ("à", "è", "é", "ì", "ò", "ù");

si può adottare la seguente funzione:

Private Function AlfaNumerico(s As String) As Boolean

 Dim bb As Byte[] = [224, 232, 233, 236, 242, 249] ' Codici dell'ASCII esteso che rappresentano le lettere con segni diacritici
 Dim bo As Boolean

 For c As Short = 1 To String.Len(s) 
   If ((String.Code(s, c) > 47) And (String.Code(s, c) < 58)) Or ((String.Code(s, c) > 64) And (String.Code(s, c) < 91)) Or ((String.Code(s, c) > 96) And (String.Code(s, c) < 123)) Or (bb.Exist(String.Code(s, c))) Then 
     bo = True
   Else 
     bo = False
     Break 
   Endif
 Next

 Return bo

End