0

根据条件，我想移动一个子表单。它涉及隐藏另一个子表单并将这个子表单移动到它的位置。我注意到在第一个条件下，没有必要定义 TOP，因为它会自动保留此设置。但是无论我如何在 ELSE 条件下设置 TOP 属性，子窗体都会移动到顶部，而忽略任何微调。这到底是怎么做到的？

具体代码如下（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
4

1 回答 1

1

看起来您正在尝试在代码中使用英寸。VBA 在放置控件时使用缇，尝试使用 1770 而不是 1.2292。

于 2018-02-02T18:42:23.353 回答