以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助msgbox函数使用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55778)

--  作者:divil
--  发布时间:2014/8/22 22:55:00
--  求助msgbox函数使用
版主,您好!我自己试着做了一个打印测试单系统,有两个表,一个是打印测试单表,还有一个是数据源表,两者通过SN号关联,父表是数据源,子表是打印测试单表(表中SN号为数据列,其余测试值都是公式列,方便利用表关联自动带出值),在打印测试单表中的SN列中用条码枪扫产品的SN条码信息,自动将各测试值带出来,想实现一个功能:RLmax1610#00nm1620#00nm最后一列的值小于0.8时有提示框蹦出来告诉指标超标,请教如何实现,谢谢!
图片点击可在新窗口打开查看此主题相关图片如下:打印测试单表.png
图片点击可在新窗口打开查看
图片点击可在新窗口打开查看此主题相关图片如下:数据源.png
图片点击可在新窗口打开查看


--  作者:Bin
--  发布时间:2014/8/23 9:04:00
--  
请上例子
--  作者:divil
--  发布时间:2014/8/23 10:25:00
--  
超级版主,您好!打印测试单表中的SN列数据(我是直接扫描条码输入的),其余的表达式列都是利用关联表自动带出测试数据,但最后一列的数据低于0.8时,需要弹出提示框显示指标异常。看是否能在表中编辑函数实现此功能。谢谢!
--  作者:Bin
--  发布时间:2014/8/23 10:32:00
--  
在DatacolChange事件判断一下

if e.datarow("最后一列") <0.8 then
   messagebox.show("异常")
end if

--  作者:divil
--  发布时间:2014/8/23 10:58:00
--  
谢谢,已解决!
--  作者:divil
--  发布时间:2014/8/23 11:24:00
--  
版主,您好,
If e.DataRow("ILmax1260#00nm1360#00nm") >1.18 Then
   messagebox.show("ILmax1260#00nm1360#00nm插损指标异常")
End If 
要求ILmax1260#00nm1360#00nm列值>1.18以及<0.02,都会提示messagebox.show("ILmax1260#00nm1360#00nm插损指标异常")怎么编辑函数?求教,谢谢!


--  作者:Bin
--  发布时间:2014/8/23 11:27:00
--  
If e.DataRow("ILmax1260#00nm1360#00nm") >1.18 andalso  e.DataRow("ILmax1260#00nm1360#00nm") <0.02 Then
--  作者:divil
--  发布时间:2014/8/23 14:05:00
--  
谢谢,我将andalso改成OR,出现上述两种情况时都提示!