[Resolvido]Mover campo no fomrulário seguindo critério

Tenho um formulário no qual um campo que fica oculto (area) e só aparece quando um critério é atendido (Nível Superior), ele se torna visível para ser editado.
Mais fica um vago quando o campo fica oculto. Então
Minha pergunta como faço para que quando ele estiver oculto no formulário os demais campos sobem para não ficar este espaço.
e quando ele estiver visível os campos vão para baixo dando lugar ao campo.

Obrigado!

Boa noite,
No código que mostra ou oculta o controlo, defina a posição (top, left) dos demais

Como faço quanto as definições das posições, considerando que as mesma são números fracionados exemplo

controle: AlergMedicamento TOP: 5,647cm LEFT: 15,305cm

quando coloco no evento

me.AlergMedicamento.Move (left, top, width, heigth)
quando ponho a vírgula as posições mudam.

Boa tarde,
Veja as propriedades que enunciei. Elas são determinadas em pixels. Tendo noutra unidade, terá de converter

Essas medida não em Twips (567) equivalem a 1cm

Bom dou como resolvido, pois conseguir através de uma função e uma chamada no evento ao alterar no campo Escolaridade.
ficou assim.

Código:

'Ocultar e ativar campo Area de atuação e Deslocar demais campos
    If Me.ESCOLARIDADE.value = "SUPERIOR" Then
        Me.AREA.Visible = True
        Call DeslocamentoNormal
    Else
        Me.AREA.Visible = False
        Call DeslocamentoCima
    End If


Como estava com dificuldade em relação ao numero inteiro e nem como transforma-lo em outra sistema de medida
fui testando e encontrei uma solução prática que resolveu o meu problema veja:
se 1 cm equivalem 567 twips
então coloquei uma constante no frm da seguinte forma

Const consPixel = 567

e para resolver a questão de numero fracionado (com virgula) coloquei o numero entre aspar e pronto fez a multiplicação e deslocamento para a posição desejada sem problemas

Código:

Public Function DeslocamentoNormal()

    Me.rtAlergico.Move consPixel * "10,106", consPixel * "6,217"
    Me.AlergMedicamento.Move consPixel * " 15,305", consPixel * "6,217"
...
    Me.OBS.Move consPixel * "12,908", consPixel * "9,871"

End Function


Código:

Public Function DeslocamentoCima()

    Me.rtAlergico.Move consPixel * "10,106", consPixel * "5,608"
    Me.AlergMedicamento.Move consPixel * " 15,305", consPixel * "5,608"
....
End Function

Não compreendi como fizeste, podes por bd para exame? ou outra com o código?

Como solicitado segue o BD

A esclarecer nas fórmulas acima eu apenas reduzir com são vário os campos que fazem a movimentação.

Muito bom parabens