Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共31 条记录, 每页显示 10 条, 页签: [1] [2][3][4]
[浏览完整版]

标题:[求助]新手求学,关于事件

1楼
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




为什么我在对 供应商合同 这个列的某一行修改内容后,不弹出对话框呢?
2楼
狐哥 发表于:2009/6/29 14:30:00
"user.name & 请注意"
3楼
smileboy 发表于:2009/6/29 14:42:00
MessageBox.Show(user.name,"请注意",MessageBoxButtons.YesNo, MessageBoxIcon.Question)
4楼
roy78 发表于:2009/6/29 15:11:00
还是没有反应啊 ,没有弹出对话框
5楼
狐狸爸爸 发表于:2009/6/29 15:17:00
3楼的带脉没有问题,没有出现对话框,说明不符合你设置的条件,所有没有出现。

你可以看看这个,在供应商合同列输入字符“我”,就会出现提示

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目119.table

6楼
yangming 发表于:2009/6/29 15:18:00
发文件看看吧,另外,你代码是放在何处的?
7楼
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
8楼
roy78 发表于:2009/6/29 16:00:00
谢谢,狐狸爸爸 同样也感谢所有帮助的朋友. 你的这个是有效的,我目前连接的是外部数据,难道是何这有关系? 我目前依然无反应!!你的程序可以用
[此贴子已经被作者于2009-6-29 16:00:34编辑过]
9楼
狐狸爸爸 发表于: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

这样就能检查关键的内容,例如列名、新输入的值,是否符合设置的条件,一目了然,调试通过再删除第一行代码。

10楼
roy78 发表于:2009/6/29 16:07:00
好了,呵呵,这是何原因? 狐狸爸爸 9楼的代码成功.
共31 条记录, 每页显示 10 条, 页签: [1] [2][3][4]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02734 s, 3 queries.