Access 2010 Перемещение подчиненной формы программно с помощью свойства TOP

В зависимости от условия я бы хотел, чтобы подчиненная форма двигалась. Это включает в себя сокрытие другой подчиненной формы и перемещение этой подчиненной формы на свое место. Я заметил, что в первом условии нет необходимости определять TOP, поскольку он автоматически сохраняет эту настройку. Но независимо от того, как я установил свойство TOP в условии ELSE, подчиненная форма просто перемещается к вершине, игнорируя любую тонкую настройку. Как именно это можно сделать?

Точный код выглядит следующим образом (ReturnsRecords - это просто функция, которая возвращает истину или ложь в зависимости от того, возвращает ли она записи)

If ReturnsRecords("SELECT DISTR_ID From tbl_SP WHERE distr_id = " & Me!DISTR_ID) Then

            'Form_DISTRO.sfm_AFP_SPLIT.Top = 3.0417

            AdjustDistro "AFP", cLatest


        Else
            Form_DISTRO.sfAFP.Visible = False
            Form_DISTRO.sfm_AFP_SPLIT.Top = 1.2292
            MsgBox "Please enter a spend plan before adjusting this distribution", vbInformation


        End If

1 ответ

Решение

Похоже, вы пытаетесь использовать дюймы в вашем коде. VBA использует твипы при размещении элементов управления, попробуйте использовать 1770 вместо 1.2292.

Другие вопросы по тегам