以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 查找*字符和单元格绘制 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=140506) |
-- 作者:漂亮美眉vszh -- 发布时间:2019/9/7 8:58:00 -- 查找*字符和单元格绘制 老师,我有两个问题:1.要查找的字符是*,但*是通配符,导致语句报错 Dim drtx1 As DataRow Dim st As String = "|**|" drtx1 = DataTables("APQP基本资料信息").Find("特性编号 = \'Pd-2\' And 项目编号 = \'" & Tables("APQP基本资料主表").current("项目编号") & "\' and 项目 = \'影响因素\' and [影响因素] like \'%" & st & "%\'") If drtx1 IsNot Nothing Then \'如果找到的话 MessageBox.Show(200) Else MessageBox.Show(100) End If If e.Col.name = "DefiniRange" Then e.StartDraw() e.Graphics.FillRectangle(Brushes.Red,10,10,100,50) e.EndDraw() End If 在DrawCell事件里写代码,单元格行高与列宽都非常大。另外如果我导出这张表,单元格内绘制的形状该如何导出? |
-- 作者:有点蓝 -- 发布时间:2019/9/7 9:17:00 -- 1、参考:http://www.foxtable.com/webhelp/topics/0102.htm * 和 % 默认作为通配符,如果要将其作为比较内容的一部分,必须用方括号括起来,例如: [型号] Like \'A[*]%\' 表示型号以“A*”开头。 2、e.Graphics.FillRectangle(Brushes.Red,e.X+10,e.y+10,100,50) |
-- 作者:漂亮美眉vszh -- 发布时间:2019/9/7 10:40:00 -- 此主题相关图片如下:567.png Dim drtx1 As DataRow drtx1 = DataTables("APQP基本资料信息").Find("特性编号 = \'Pd-2\' And 影响因素 Like \'%|[**]|%\'") If drtx1 IsNot Nothing Then \'如果找到的话 MessageBox.Show(1) Else MessageBox.Show(0) End If 加了括号,还是报错呢? |
-- 作者:漂亮美眉vszh -- 发布时间:2019/9/7 10:40:00 -- 把竖线加上去或是去掉,都报错 |
-- 作者:有点蓝 -- 发布时间:2019/9/7 10:45:00 -- And 影响因素 Like \'%|[*][*]|%\'") |
-- 作者:漂亮美眉vszh -- 发布时间:2019/9/7 11:03:00 -- 不好意思老师,还有一个问题,我绘制好的图形,如何导出到EXCEL内?类似于下图这样: |
-- 作者:有点蓝 -- 发布时间:2019/9/7 11:12:00 -- 没有办法导 |