其他部分没有问题，就是表达式，老是合成不对，麻烦看看
'如果窗口:男生资料主窗口,打开了,关闭窗口
If Forms("男生资料主窗口").opened = False Then
LockWindowUpdate(baseMainform.handle)
Forms("男生资料主窗口").open()
LockWindowUpdate(System.IntPtr.Zero)
With DataTables("男生资料主窗口_Tablenanszl") '设置分页加载,第一页(只要之前,男生资料主窗口,没有打开,就执行这段代码)
.LoadTop = 4
.LoadPage = 0
.loadFilter = "[审核情况] = '正在审核' AndAlso [性别] = '男'"
.Load()
End With
ElseIf Forms("男生资料主窗口").opened = True Then
With DataTables("男生资料主窗口_Tablenanszl") '设置分页加载,第一页(只要之前,男生资料主窗口,打开了,就执行这段代码)
.LoadTop = 4
.LoadPage = 0
.loadFilter = "[审核情况] = '正在审核' AndAlso [性别] = '男'"
.Load()
End With
End If
[此贴子已经被作者于2016/12/20 15:18:58编辑过]
加好友 
发短信
Post By：2016/12/20 15:19:00 [显示全部帖子]
