• Home
 · 
• String Manipulation
 · 
• A simple way to validate data entered by a user

A simple way to validate data entered by a user

A simple way to validate data entered by a user

API Declarations


Dim arr(5, 0) As String
Dim i As Integer



Rate A simple way to validate data entered by a user

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

    Dim arr(5, 0) As String
    Dim i As Integer
    arr(0, 0) = "@"
    arr(1, 0) = "#"
    arr(2, 0) = "$"
    arr(3, 0) = "%"
    arr(4, 0) = "^"
    arr(5, 0) = "&"
    
        For a = 0 To 5
            i = InStr(1, Text1, arr(a, 0))
            If i <> 0 Then
            MsgBox "No Invalid Characters"
            Exit Sub
            End If
        Next a