= this or that question (string)

[killer_cobra]

Hi,
I have a have several strings that are only unique by the last 3 characters and I need to put in an if statement.

However I am having trouble with it:

If not Right (listbox1, 3) = "123" OR "234" or "345" then
DoWhatever
End if

You should notice that the above code doesn't work. (As I just found out). I need it to be able to do what the above code says in plain english (not vb terms). So basically if it doesn't match any of those then it goes to DoWhatever. I could do this with multiple If-Else-End if statements, but I'm wondering if there is a way to do this similar to the provided code? Am I missing some keyword? (tried a lot of them too).

Thanx in advance,

Scott

[Motoxpro]

maybe commas instead of OR im probly wrong tho i havent learned about the OR staement yet

[eanilarora]

If Not (Right(myStr, 3) = "123" Or Right(myStr, 3) = "234" Or "345") Then
    'Do Whatever
End If

The Left side of the operator = has to be given everytime

[Motoxpro]

aaaaaw...

[rudvs2]

okay try doing this

Dim strData As String
 
strData = Right(list1.List(1),3)  
'In your code you did not specify the listbox list index that you 
'wanted to use you will probably need to place some code a for 
'next statement to encapsualte this code and step through your 
'list or something depending what you want to do 
 
Select Case StrData
 
     Case Is = "123", "234", 345"
          'your stuff here
 
     Case Else 
          'If no match here
 
End Select

[eanilarora]

Originally posted by Motoxpro
aaaaaw...

Did my reply pinch u or what

[Motoxpro]

no like aaa ok hehe

[da_silvy]

StrData = Right(myStr, 3)
If Not StrData = "123" Or Not StrData = "234" Or Not StrData =  "345" Then
    'Do Whatever
End If

I think that should also work