Foxtable(狐表)用户栏目专家坐堂 → 奇怪的程序假死问题


  共有7989人关注过本帖树形打印复制链接

主题:奇怪的程序假死问题

帅哥哟,离线,有人找我吗?
lsy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/8/4 18:52:00 [显示全部帖子]

If DataTables("供应商资料主表").DataRows.Count = 0  AndAlso DataTables("供应商资料子表").DataRows.Count = 0  Then

 

Orelse ?


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/8/4 19:01:00 [显示全部帖子]

你判断两个条件。

一个条件不满足的话,结果会怎样?


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/8/4 19:06:00 [显示全部帖子]

主表没有数据,下面的代码无法执行;

子表没有数据,下面的代码同样无法执行。

这样判断,就该用Orelse


 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/8/4 19:17:00 [显示全部帖子]

只有传上来,实测了。

 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/8/4 19:49:00 [显示全部帖子]

For Each dr As DataRow In DataTables(tbn).DataRows
      ids = ids & ",'" & dr(keys) & "'"
      ids= ids.Trim(",")
      DataTables(tbn1).LoadFilter = keys & "In (" & ids & ")"
Next

ids= ids.Trim(",")
DataTables(tbn1).LoadFilter = keys & "In (" & ids & ")"

 

两行红色的应该放在循环的外面。



 回到顶部
帅哥哟,离线,有人找我吗?
lsy
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/8/4 20:10:00 [显示全部帖子]

你用MessageBox测试,就知道了,你放在里面,增加不少负担。


 回到顶部