Visual Basic - Ayuda calculadora

Estoy realizando una calculadora, todas las operaciones ya me salen, menos la raiz, como se hace?.
Tengo un text1 para los numeros, luego cuando le den al bton de raiz, lo mando a un text2 y ahi le doy que el text1 sea la raiz del text2 y me marca un error, como le puedo hacer???

Este es el codigo q tengo cuando sea click al boton raiz

Private Sub sqr_Click()
Text2.Text = Text1.Text
Text1.Text = sqr(Abs(CDbl(Text2.Text)))
End Sub

he probado tu ejemplo y efectivamente da un error, este error está en que la función raíz cuadrada es SQR y el botón de órdenes le llamas SQR y AHÍ ESTÁ EL ERROR cambiale el nombre al botón y verás como funciona.

saludos

GRACIAS, SOBRES