快速开发平台--编译错误：子过程或函数未定义/RDPCloseForm

时　间:2018-01-23 08:09:31
作　者:杨雪   ID：42182  城市：南京
摘　要:快速开发平台  版本号：2.0.4.312 编译错误：子过程或函数未定义/RDPCloseForm me
正　文:

软件开发过程中编译提示：

编译错误：子过程或函数未定义

修改方法：

Public Function RDPCloseForm(LoadedForm As Form) As Boolean
    On Error Resume Next
    DoCmd.Close acForm, LoadedForm.Name, acSaveNo
    LoadedForm.Parent!lblNodePath.Caption = ""
    LoadedForm.Parent!sfrChild.Top = 0
    LoadedForm.Parent!sfrChild.Height = LoadedForm.Parent!sfrChild.Height + LoadedForm.Parent!lblNodePath.Height
    LoadedForm.Parent!sfrChild.SourceObject = "SysFrmMain_HomePage"
End Function