Visual Basic (VB6 and VBA)
Copyright 1999-2001 Christopher Greaves. All rights reserved.
Home Page and email to [email protected]
If in doubt, record a macro and inspect the entrails!

 

Visual Basic Library

This page was last updated on Saturday, November 24, 2001

Public Function blnAlphaOnly(strIn As String) As Boolean
' Procedure :   blnAlphaOnly
' Description:  Test if the given string contains only alphabetic characters.
' Copyright:    Chris Greaves Inc.
' Inputs:       A possibly empty string.
' Returns:      TRUE if nothing other than a-z or A-Z are found in the source string
' Assumes:      Nothing
' Side Effects: None.
' Tested:       By the calls shown below.
    blnAlphaOnly = strAlphaOnly(strIn) = strIn
'Sub TESTblnAlphaOnly()
'MsgBox blnAlphaOnly("alphabet") ' TRUE
'MsgBox blnAlphaOnly("alphabetand1digit") ' FALSE
'MsgBox blnAlphaOnly("") ' TRUE
'End Sub
End Function
We all knew nothing when we started …
Home Page and Contact Information
Send email to [email protected].
This page was last updated Monday, November 19, 2001

 

 

Hosted by www.Geocities.ws

1