IS Function

[lpb71]

What is the IsNumeric equivalent to my command below to check that a character a-z has been entered.

if len(branchid)=3 and IsNumeric(branchid) then exit do

Thanks

 

[tsuji]

[tt]if len(branchid)=1 and instr(1,branchid,"abcdefghijklmnopqrstuvwxyz",0)<>0 then exit do[/tt]

 

[rjoubert]

tsuji's code will not work for you. That looks for an occurrence of that entire string of 26 letters in your branchid variable.

Add this function to your code...

Public Function IsAlpha(ByVal sChr As String) As Boolean
    IsAlpha = sChr Like "[A-Za-z( )]"
End Function

It returns a boolean if your string contains alpha characters.

If IsAlpha(branchid) Then exit do

 

[tsuji]

>tsuji's code will not work for you
That is not infrequent and that's truly fine as a comment.

But you cannot bend a language to your liking by pure imagination. This is vbs forum.

 

[tsuji]

My error is inadvertently reversed the position of the 2 parameters. This is the correction.

[tt]if len(branchid)=1 and instr(1,"abcdefghijklmnopqrstuvwxyz",branchid,0)<>0 then exit do[/tt]

 

[rjoubert]

That would only work if the length of branchid is always going to be 1. The OP has a check for len(branchid) = 3.

 

[lpb71]

Thanks Guys,

My OP will always be 1, could not get the Function to work, kept saying missing ")" on the public function line.

Used instr which works fine.

Thanks again Guys.