以文本方式查看主题

-  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

图片点击可在新窗口打开查看此主题相关图片如下:456.png
图片点击可在新窗口打开查看
2.我想要单元格内绘制一个正方形,可是为什么没有出现呢
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内?类似于下图这样:

图片点击可在新窗口打开查看此主题相关图片如下:789.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2019/9/7 11:12:00
--  
没有办法导