¿Cómo comprobar si text1 contiene text2 usando vb6?¿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
Puede utilizar InStr función como esta:
Dim position As Integer
position = InStr(1, stringToSearch, stringToFind)
If position > 0 Then
' text is inside
Else
' text is not inide
End If
Uso InStr:
If InStr(text1, text2) > 0 Then
Esto debería hacer el truco:
if (InStr(text1, text2) > 0)
Comprobar http://msdn.microsoft.com/en-us/library/8460tsh1(v=vs.80).aspx para casos especiales (parámetros no son nada, cadenas vacías, etc.)
Estás realizando un enlace a vb.net, no a vb6. – Oded
RTM = InStr(1, text1,text2)
if RTM > 0 then debug.print "Text2 was found at position: "; RTM
+1 pero por qué no vincular a la entrada manual de VB6 para Instr http://msdn.microsoft.com/en-us/library/aa445031(v=VS. 60) .aspx – MarkJ