自定义内部函数出错。有LoadDataTable这个用法吗? Post By:2019/7/13 11:03:00 [只看该作者]
看论坛里月光工作室的一个视频提到自定义内部函数的制作,我抄了代码,运行通不过呢?
'Functions.Execute("窗口表加载",e,"订单_主表,订单_明细表,物品管理")
Dim e As Object=Args(0) Dim TabName As String=Args(1) Dim js As Integer=0 For Each tn As String In TabName.Split(",") If DataTables.Contains(tn)=False Then LoadDataTable(tn,"1=2") js=js+1 End If Next If js>0 Then e.Form.Close e.Form.Open Return True End If