Case "电话记录"
MessageBox.Show("0")
If DataTables.Contains("电话记录") = False Then '如果电话记录表没有加载
MessageBox.Show("1")
DataTables.Load("电话记录") '加载电话记录表
End If
MessageBox.Show("设置datasource前")
Tables("电话记录").DataSource = DataTables("电话记录")
MessageBox.Show("设置datasource后")
Forms("win_电话记录窗口").open()
MessageBox.Show("设置maintable前")
MainTable = Tables("电话记录")
MessageBox.Show("设置maintable后")
在beforeloadoutertable中弹出"打开项目不加载表"消息,我在打开窗口前执行上面这段代码,弹出0和1后(并没有弹出后面的message),为什么又执行了一次beforeloadoutertable(也就是弹出了”打开项目不加载表“消息),我导出代码后,查看并没有什么地方引用了beforeloadoutertable,取消beforeloadoutertable里面的代码后,一切恢复正常, 请问是怎么回事。
beforloadoutertable代码如下:
If e.DataTableName
= "电话记录" Then
MessageBox.Show("打开项目不加载表")
e.Cancel = True '打开项目的时候不加载此表
End If
[此贴子已经被作者于2024/1/27 12:26:08编辑过]