Visual Basic - Comparacíón de Cadenas

Quisiera saber si existe una función que permita comparar cadenas y que responda True en el caso del ejemplo : Cadena1="ABCD", Cadena2="BACD". Las letras son las mismas en cada caso, sólo cambian su posición dentro de la cadena. Gracias a todos.

hola, pues si , existe es : Like y un ejemplo seria:
MiPrueba = "a2a" Like "a#a" 'Devuelve True
otro practico seria:
Label1 = "ABCD" Like "ABCD" ' Devuelve True
Label1 = "ABCD" Like "BACD" ' Devuelve False

Gracias por tu respuesta . Parece que el operador LIKE si tiene en cuenta el orden de los caráctares a la hora de comparar cadenas y es lo que a mi no me interesa : "ABCD" debe ser true cuando se compara con "DCBA" ya que tiene los mismos carácteres pero ordenados en posiciones distintas dentro de la cadena y esto el operador LIKE no lo tiene en cuenta. De todas formas lo dicho, gracias por tu atención.

Mateo:
La funciòn que mencionas no existe.... pero puedes crearla....

te armo un esquema somero, pero deberàs completarlo y emprolijarlo

public function compara(str1 as string,str2 as string)as boolean
dim vct1() as string * 1
dim vct2() as string *1
if len(str1) <>len(str2) then
compara=false
exit function
end if
for i=1 to len(str1)
vct1(i)=mid$(str1,i,1)
vct2(i)=mid$(str2,i,1)
next
'aplica un algoritmo de ordenaciòn,burbuja, etc
for i =1 to len(str1)
if vct1(i)<>vct2(i) then
compara=false
exit function
end if
next
compara=true
end function

Hola Dante, busca "like" en la ayuda de tu VB y veras como aparece, ademas prueva el ejemplo y veras como funciona