usings contains in var check

[Guest]

How do I check that a variable 'contains' something?

eg.

myVar = "myfile01203"

If myVar contains "myfile" then
'do something
End if

 

[Norman Jones]

Hi Bruce,

Try something like:

Sub Test01()
Dim myVar As String

' myVar = "myfile01203"

If Len(myVar) > 0 Then
'do something, e.g.
MsgBox myVar
Else
'do something else?
End If
End Sub

 

[Guest]

Not quite what I was thinking. Let me try again.

I want to test whether my Var contains myfile. Any ideas...

 

[Norman Jones]

Hi Bruce,

sStr = "myfile01203"

If myVar = sStr Then
'do something, e.g.
MsgBox myVar
Else
'do something else?
End If

 

[Eric]

Hi Bruce,

sStr = "myfile01203"

If myVar = sStr Then
'do something, e.g.
MsgBox myVar
Else
'do something else?
End If

No, you still dont see what he is saying.

sStr= "My dogs name is spot"

if sStr contains "spot" then
' do this code
end if

I havnt any idea how to do this in vba
in c its simple if(strstr(sStr, "spot"))
{
// do code here
}
I too was looking for this but unfortunately MS doesnt list functions in the
help - you have to already know the function name to find it.
At least thats my experience.
Eric

 

[Guest]

Eric,

Ive got it;

If myVar like sStr & "*" Then

Bruce

 

[Norman Jones]

Hi Eric,

I think you have the correct interpretation!

Sub Test01()
Dim myVar As String
Dim sStr As String

myVar = "myfile01203"
sStr = "myfile"
myVar = "myfile01203"
If InStr(1, myVar, sStr, vbTextCompare) Then
'do something, e.g.
MsgBox "myVar contains the substring " & sStr
Else
MsgBox sStr & " not found"
End If
End Sub

 

[Eric]

so, if
myVar="spot"
sStr= "My dogs name is spot"

then
If myVar like sStr & "*" Then
' code will be executed here for sure?
end if

I dont get the & "*" thing, whats that mean?
Eric

 

[Eric]

Hi Eric,

I think you have the correct interpretation!

Sub Test01()
Dim myVar As String
Dim sStr As String

myVar = "myfile01203"
sStr = "myfile"
myVar = "myfile01203"
If InStr(1, myVar, sStr, vbTextCompare) Then
'do something, e.g.
MsgBox "myVar contains the substring " & sStr
Else
MsgBox sStr & " not found"
End If
End Sub

Is that case sensitive? if so how do you ignore case?
if not how do you make it case specific?
Thanks
Eric

 

[Norman Jones]

Hi Eric,

Is that case sensitive?
No.

if not how do you make it case specific?

If InStr(1, myVar, sStr, vbBinaryCompare) Then

---
Regards,
Norman



news:w%vvd.190497$V41.190304@attbi_s52...