Foxtable(狐表)用户栏目专家坐堂 → [求助]代码执行顺序问题


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

主题:[求助]代码执行顺序问题

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
[求助]代码执行顺序问题  发帖心情 Post By:2017/4/13 12:33:00 [显示全部帖子]

窗体中有一个树和一个表
窗体打开事件代码:
Vars("blnAutoRun") = true
  ‘代码段1

Vars("blnAutoRun") = false

树节点afterselectnode事件代码:
if Vars("blnAutoRun") = false then
  ’代码段2
endif

目的:窗体打开时不执行树节点afterselectnode事件代码中的代码段2,只有窗体打开后用鼠标或键盘选择树节点时才执行代码段2,现在做不到,窗体打开后直接就执行了代码段2,请问老师该如何解决

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 14:23:00 [显示全部帖子]

请老师们看看

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 15:16:00 [显示全部帖子]

TreeView没有直接得到焦点,只是在窗体打开时,用 BuildTree方法建立了树

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 15:38:00 [显示全部帖子]

代码见附件:除了上述问题外,还有一个问题,在自动更新表及字段_tb更新_Click事件中标明了,有4个字段,1个可以置空值,其它3个置不了,请老师一块看看



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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 15:41:00 [显示全部帖子]

附件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自动更新表及字段.txt


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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 15:56:00 [显示全部帖子]

谢谢老师了,按你说的修改后,第2个问题解决了,但第1个问题还是存在,就是窗体一打开就弹出消息框

MessageBox.Show("请选择具体的数据表!","提示",MessageBoxButtons.OK, MessageBoxIcon.Information)


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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 16:20:00 [显示全部帖子]

删除bin文件夹,重新打开项目后,还是原样的,感觉在刷新树时,变量Vars("blnAutoRun") 已经是 false了

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/13 16:54:00 [显示全部帖子]

谢谢老师:改代码时少改了一处,解决了

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2017/4/14 10:34:00 [显示全部帖子]

1     trv.BuildTree(dt,"数据库名称|表名称")

2     trv.SelectedNode = trv.AllNodes(0)

3     Vars("blnAutoRun") = False


再次请教老师:


    如上面代码顺序,2 执行后,是先执行 3,再执行树节点的相关事件,还是先执行树节点的相关事件,再执行3


我感觉现在是先执行了3,再执行执行树节点的相关事件,因为在执行树节点的相关事件时,Vars("blnAutoRun") 已经是false了。


 回到顶部