VB no encontrado método o miembro de datos

Ha sido probado, no hay errores, siempre y cuando haya valores desde Text1.Text a Text4.Text.

Private Sub Command1_Click()

Dim a, b, c, d, x, y como único

a = Val(Text1.Text)

b = Val(Text2.Text)

c = Val( Texto3.Texto)

d = Val(Texto4.Texto)

Texto5.Texto = (b - d) / (c - d)

Text6.Text = b - x * a

End Sub

Si aún aparece el error "Método o miembro de datos no encontrado", hay algún problema con su VB .

¿Qué sistema estás usando?