以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]dr 在封闭块中隐藏变量 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=73984) |
-- 作者:huazhencong -- 发布时间:2015/8/30 20:22:00 -- [求助]dr 在封闭块中隐藏变量 请教:我在datacolchanged事件中编写下面代码,结果出现报错信息:dr 在封闭块中隐藏变量 If e.DataCol.Name = "产品ID" Then \'如果内容发生变动的是品名列 If e.NewValue Is Nothing Then \'如果新值是空白,也就是品名列的内容为空 e.DataRow("单价") = Nothing \'那么清空此行单价列的内容 Else Dim dr As DataRow \'否则在产品表查找同名的产品行,将找到的行赋值给变量dr dr = DataTables("产品").Find("[产品ID] = \'" & e.NewValue & "\'") If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing e.DataRow("单价") = dr("产品单价") End If End If End If |
-- 作者:有点蓝 -- 发布时间:2015/8/30 20:34:00 -- 你是不是上面用到过dr这个变量啊 |
-- 作者:huazhencong -- 发布时间:2015/8/30 20:36:00 -- 喔,是的,我改成dr1就行了,谢谢啦! |