主题：帮忙看下这个错误？（如何让条形码图形居中）

此主题相关图片如下：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

 e.X + e.width/2 -59

 拆分为

 dim i as interger = e.width / 2 - 59

 e.x + i

这个办法还真简单 又能解决问题