2个回答
展开全部
明白你的意思,想通过名称获得窗体。
有两种方法
1,sub showForm(_formName as string)
select case _formName
case "form1"
form1.show
case "form2"
form2.show
end select
end sub
2 . Dim frm As Form
Dim str As String
str = "form1"
Set frm = Forms.Add(str)
frm.Show
有两种方法
1,sub showForm(_formName as string)
select case _formName
case "form1"
form1.show
case "form2"
form2.show
end select
end sub
2 . Dim frm As Form
Dim str As String
str = "form1"
Set frm = Forms.Add(str)
frm.Show
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询