studio - ¿Cómo verificar si text1 contiene text2 usando vb6?

funciones de cadena visual basic ejemplos

Question

¿Cómo verificar si text1 contiene text2 usando vb6?

Dim text1 as string
Dim text2 as string

text1 = "hello world I am Anas"
text2 = "Anas"

if (check if text2 is in text1) ''the result should be true or false

Answer 1

Esto debería funcionar:

if (InStr(text1, text2) > 0) 

Compruebe http://msdn.microsoft.com/en-us/library/8460tsh1(v=vs.v.80).aspx para casos especiales (los parámetros son Nothing, cadenas vacías, etc.)

Answer 2

Puedes usar la función InStr así:

Dim position As Integer

position = InStr(1, stringToSearch, stringToFind)

If position > 0 Then
  '' text is inside
Else
  '' text is not inide 
End If

Answer 3

Use InStr :

If InStr(text1, text2) > 0 Then

Answer 4

RTM = InStr(1, text1,text2)

if RTM > 0 then debug.print "Text2 was found at position: "; RTM