VBNET Compruebe si los símbolos de los contios Sting

If MyString.IndexOfAny("[~`!@#$%^&*()-+=|{}':;.,<>/?]".ToCharArray) <> -1 Then
MsgBox("No Symbols!")
End If
Salty Joe