Foxtable(狐表)用户栏目专家坐堂 → [求助] excel 报表中怎么设置数量


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

主题:[求助] excel 报表中怎么设置数量

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


加好友 发短信
等级:童狐 帖子:286 积分:2345 威望:0 精华:0 注册:2013/8/30 3:37:00
[求助] excel 报表中怎么设置数量  发帖心情 Post By:2015/8/25 22:34:00 [显示全部帖子]

我想在A4大小的纸上,生成4个100*100的报表,但是不会做。

在细节区<表A,4>只能竖的,我想横的有2张,请老师指点

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


加好友 发短信
等级:童狐 帖子:286 积分:2345 威望:0 精华:0 注册:2013/8/30 3:37:00
  发帖心情 Post By:2015/8/25 22:42:00 [显示全部帖子]

请问图片,怎么设置 
[&&剧毒.png, 1, 0,135,130]

[&&BarCode.gif, 2, 13,88,88]


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


加好友 发短信
等级:童狐 帖子:286 积分:2345 威望:0 精华:0 注册:2013/8/30 3:37:00
  发帖心情 Post By:2015/8/25 22:52:00 [显示全部帖子]

打开不了开发者文件,模板中是[&&BarCode.gif, 2, 13,88,88],BarCode0,BarCode1,BarCode2
但是我的生成方法是
报表事件BuildDetail做的,编码BarCode0,BarCode1,BarCode2,没有效果
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.Text = e.DataRow("编号")
            Bar.TextAlignment = Barpro.Alignment.BelowCenter
            Bar.QuietZoneWidth = 1
            Bar.QRCodeModuleSize = 1
            Bar.SaveImage(ProjectPath & "Images\BarCode.gif")
        End If
    End If
End If

 回到顶部