x0
Function ForNext(ByVal Min As Integer, ByVal Max As Integer, ByVal Bins As Integer)
Dim TabName As String
TabName = "tLimit" '设定暂存表单名称
For Each obj In CurrentData.AllTables
If TabName = obj.Name Then '如果暂存表单存在
CurrentDb.Exe ..
访客只能看到部份内容，免费 加入会员
x0