Problemas con hacer visible o invisible un subformulario

Hola, Mi nombre es martin y tengo un problema al hacer aparecer o desaparecer un subformulario.

El tema es así, tengo un formulario que posee 4 Txtbox (texto 17, 22, 24 y 26)y un botón, al presionar el botón aparece un subformulario (Cantidad Sub). Y se bloquean 3 (texto 22, 24 y 26) de los 4 Txtbox del formulario principal, la idea es que luego de completar el subformulario en este hay un botón que lo que hace (o tendría que hacer) es hacer invisible el subformulario , activar los 3 Txt que estaban bloqueados y hacer foco en uno de estos tres txtbox. Para esto construí el siguiente código:

Me.Parent.Texto17.SetFocus
DoCmd.GoToRecord , , acNewRec
Texto22.Enabled = True
Texto24.Enabled = True
Texto26.Enabled = True
DoCmd.GoToControl "Texto22"<br class="scayt-misspell" data-scayt_word="Comando17" data-scaytid="353" />Cantidad_Sub.Form.Visible = False

Pero no funciona.

Quisiera saber que estoy haciendo mal

Muchas gracias

Martin