以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  [求助]新手求学，关于事件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3357)

--  作者：roy78 --  发布时间：2009/6/29 14:21:00 --  [求助]新手求学，关于事件 if e.datacol.name="供应商合同" then  if e.newvalue="我" then MessageBox.Show("user.name","请注意",MessageBoxButtons.YesNo, MessageBoxIcon.Question) end if end if 为什么我在对　供应商合同　这个列的某一行修改内容后，不弹出对话框呢？

--  作者：狐哥 --  发布时间：2009/6/29 14:30:00 --   "user.name & 请注意"

--  作者：smileboy --  发布时间：2009/6/29 14:42:00 --   MessageBox.Show(user.name,"请注意",MessageBoxButtons.YesNo, MessageBoxIcon.Question)

--  作者：roy78 --  发布时间：2009/6/29 15:11:00 --   还是没有反应啊　，没有弹出对话框

--  作者：狐狸爸爸 --  发布时间：2009/6/29 15:17:00 --   3楼的带脉没有问题，没有出现对话框，说明不符合你设置的条件，所有没有出现。 你可以看看这个，在供应商合同列输入字符“我”，就会出现提示  下载信息  [文件大小：   下载次数： ] 点击浏览该文件:管理项目119.table

--  作者：yangming --  发布时间：2009/6/29 15:18:00 --   发文件看看吧,另外,你代码是放在何处的?

--  作者：yangming --  发布时间：2009/6/29 15:25:00 --   放在表DataColChanged事件中 if e.datacol.name="供应商合同" then  if e.newvalue="我" then MessageBox.Show("user.name","请注意",MessageBoxButtons.YesNo, MessageBoxIcon.Question) end if end if

--  作者：roy78 --  发布时间：2009/6/29 16:00:00 --   谢谢，狐狸爸爸　同样也感谢所有帮助的朋友．　你的这个是有效的，我目前连接的是外部数据，难道是何这有关系？ 我目前依然无反应！！你的程序可以用 [此贴子已经被作者于2009-6-29 16:00:34编辑过]

--  作者：狐狸爸爸 --  发布时间：2009/6/29 16:04:00 --   内外都一样,编写程序没有任何差别的. 建议你把代码改为： MessageBox.Show(e.DataCol.Name & "|" & e.NewValue & (e.datacol.name="供应商合同" AndAlso e.newvalue="我")) if e.datacol.name="供应商合同" AndAlso e.newvalue="我" then     MessageBox.Show(user.name,"请注意",MessageBoxButtons.YesNo, MessageBoxIcon.Question) end if 这样就能检查关键的内容，例如列名、新输入的值，是否符合设置的条件，一目了然，调试通过再删除第一行代码。

--  作者：roy78 --  发布时间：2009/6/29 16:07:00 --   好了，呵呵，这是何原因？　狐狸爸爸　9楼的代码成功．