VB code: Public Function openrecord(str1 As String, record As ADODB.Recordset) Set record = New ADODB.Recordset record.Open str1, CurrentProject.Connection, adOpenKeyset, adLockOptimistic End Function
我在类中有一个函数 Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean siteconfig是我自定义类型的数据，为什么会提示“只有在公共对象模块中� ......
