- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 帮忙看下这个错误？（如何让条形码图形居中） (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=23661)
-- 发布时间：2012/9/15 22:28:00
-- 帮忙看下这个错误？（如何让条形码图形居中）
此主题相关图片如下：2012-09-15_222555.jpg
在drawcell中绘制条形码的时候，为了让ean13条形码居中单元格 做的运算。
整段代码如下
If e.Col.Name.contains("条码") Then
If e.Row(e.col.Name ).length = 13 Then
ean13BarCode.Code = e.Text.SubString(0,12)
\'e.Graphics.DrawImage(BarCodeCtl.GetImage,e.X + 1,e.Y + 1,e.Width - 2,e.Height - 2) \'图片适应单元格大小
e.Graphics.DrawImage(ean13BarCode.GetImage,e.X + e.width/2 -59 ,e.Y + 1)
\'如果觉得适应单元格大小时图片比较模糊就用这一句
e.Text = ""
End If
End If
此主题相关图片如下：2012-09-15_222836.jpg
此主题相关图片如下：2012-09-15_233249.jpg
[此贴子已经被作者于2012-9-15 23:34:50编辑过]
-- 发布时间：2012/9/16 0:20:00
--
e.X + e.width/2 -59
拆分为
dim i as interger = e.width / 2 - 59
e.x + i
-- 发布时间：2012/9/16 9:32:00
--
这个办法还真简单 又能解决问题