以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]新手求学,关于事件  (http://foxtable.net/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楼的代码成功.