Advertisement
2002VB String Manipulation #22538

Check for extended ASCII

Checks to make sure the contents of a TextBox or String are only standard ASCII; If it has any extended ASCII, the function will return False.

AI

ملخص الذكاء الاصطناعي: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

كود المصدر
original-source
Function Valid_ASCII(Text As String)
 For x = 1 To Len(Text)
  If Asc(Mid(Text, x, 1)) > 126 Or Asc(Mid(Text, x, 1)) < 32 Then
   Valid_ASCII = False
   Exit Function
  End If
 Next x
 Valid_ASCII = True
End Function
التعليقات الأصلية (3)
مسترجع من Wayback Machine