以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- TextBox公共成员 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=140183)
|
-- 作者:seal51
-- 发布时间:2019/8/31 10:05:00
-- TextBox公共成员
If Forms("修改价格条款").Opened AndAlso Forms("修改价格条款").Controls("价格条款").Table.Current IsNot Nothing Then Tables("价格条款").Filter = "pricetk = \'" & Forms("修改价格条款").Controls("价格条款").Table.Current("pricetk") & "\'" Else Tables("价格条款").Filter = "" End If
.NET Framework 版本:4.0.30319.42000 Foxtable 版本:2019.8.29.1 错误所在事件:窗口,修改价格条款,AfterLoad 详细错误信息: 未找到类型“TextBox”的公共成员“Table”。
|
-- 作者:seal51
-- 发布时间:2019/8/31 10:08:00
--
知道错误出在那里了
|
-- 作者:seal51
-- 发布时间:2019/8/31 10:58:00
--
.NET Framework 版本:4.0.30319.42000 Foxtable 版本:2019.8.29.1 错误所在事件: 详细错误信息: 语法错误:“AN”运算符后缺少操作数。
|
-- 作者:有点蓝
-- 发布时间:2019/8/31 11:09:00
--
写什么代码引起的?
|
-- 作者:seal51
-- 发布时间:2019/8/31 11:16:00
--
If Forms("选择价格条款").Opened AndAlso Forms("选择价格条款").Controls("价格条款").Table.Current IsNot Nothing Then Tables("价格条款").Filter = "pricetk = \'" & Forms("选择价格条款").Controls("价格条款").Table.Current("pricetk") & "\'" Else Tables("价格条款").Filter = "" End If
选择价格条款窗口里的副本价格条款表的pricetk=价格条款表里的pricetk的时候出现这个错误, 选择其他,没有此错误
|
-- 作者:有点蓝
-- 发布时间:2019/8/31 11:25:00
--
msgbox("pricetk = \'" & Forms("选择价格条款").Controls("价格条款").Table.Current("pricetk") & "\'")显示什么内容?
|
-- 作者:seal51
-- 发布时间:2019/8/31 12:13:00
--
\'pricetk = \'\' 附近有语法错误。
此主题相关图片如下:qq截图20190831121428-515151.jpg
[此贴子已经被作者于2019/8/31 12:15:07编辑过]
|
-- 作者:seal51
-- 发布时间:2019/8/31 12:20:00
--
此主题相关图片如下:qq截图20190831121755-616161.jpg
|
-- 作者:有点蓝
-- 发布时间:2019/8/31 14:01:00
--
里面有单引号,需要特别处理一下
Tables("价格条款").Filter = "pricetk = \'" & Forms("选择价格条款").Controls("价格条款").Table.Current("pricetk").replace("\'","\'\'") & "\'"
|