Foxtable(狐表)用户栏目专家坐堂 → [求助]二维码内容居左


  共有2523人关注过本帖树形打印复制链接

主题:[求助]二维码内容居左

帅哥哟,离线,有人找我吗?
新航程小何
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
[求助]二维码内容居左  发帖心情 Post By:2015/6/24 17:19:00 [显示全部帖子]

各位老师,我写了如下代码,生成了二维码,但是发现二维码的内容都是居中的,我想让现实内容居左,怎么写?
If e.Book.TempLate = "二维码" Then
    If e.region = "表A" Then
        If e.DataRow Is Nothing OrElse e.DataRow.IsNull("第四列") Then '如果是空行或者Lot列为空
            Dim img As New System.Drawing.Bitmap(1,1) '生成一个空白图片
            img.Save(ProjectPath & "Images\BarCode.gif")
        Else '否则生成条形码图片
            Dim Bar As New BarCodeBuilder
            Bar.Symbology = Barpro.Symbology.QRCode
            Bar.Code =e.DataRow("第四列") 
            Bar.BarRatio = 0.3
            Bar.BarHeight = 8
            bar.SaveImage(ProjectPath & "Images\BarCode.gif",300)
        End If
    End If
End If


 回到顶部
帅哥哟,离线,有人找我吗?
新航程小何
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
  发帖心情 Post By:2015/6/24 17:33:00 [显示全部帖子]

????没办法嘛?

 回到顶部
帅哥哟,离线,有人找我吗?
新航程小何
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
  发帖心情 Post By:2015/6/24 17:44:00 [显示全部帖子]

不是图片位置,是二维码里面的内容,在我扫描出来之后内容是居中的,我想让文本内容居左

 回到顶部
帅哥哟,离线,有人找我吗?
新航程小何
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
  发帖心情 Post By:2015/6/24 18:06:00 [显示全部帖子]

啊?我换了很多手机,结果都是一样的,苹果,小米,联想

 回到顶部