问题描述
我试过了:
Private Sub Command229_Click()
Dim newForm As String
newForm = “FormAB”
DoCmd.OpenForm newForm,acnormal
我试过了:
Private Sub Command229_Click()
Dim newForm As String
newForm = “FormAB”
DoCmd.OpenForm newForm,acFormAdd
然后我尝试了:
Public clnClient As New Collection
Function OpenAClient()
Dim frm As Form
Set frm = New Form_frmClient
frm.Visible = True
frm.Caption = frm.Hwnd & ",opened " & Now()
clnClient.Add Item:=frm,Key:=CStr(frm.Hwnd)
Set frm = nothing
这会创建已打开实例的副本。是否可以修改此代码,以打开一个新的空白记录表单?
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)