以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  生成的二维码如何放入指定的单元格内  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=141516)

--  作者：yifan3429 --  发布时间：2019/10/1 16:53:00 --  生成的二维码如何放入指定的单元格内 Dim doc As New PrintDoc \'定义一个报表 Dim rt As New prt.RenderTable() \'定义一个表格对象 Dim rx As New prt.RenderText \'定义一个文本对象 Dim CurRow As Row = Tables("会议记录").Current \'链接二维码 Dim rg As prt.RenderGraphics Dim Bar As New BarCodeBuilder Bar.Symbology = Barpro.Symbology.QRCode Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight bar.Code = "会议主题:" & CurRow("会议主题") & vbcrlf &"会议时间:" & CurRow("会议时间") & vbcrlf & "会议地点:" &  CurRow("会议地点") rg = new prt.RenderGraphics bar.DrawOnCanvas(rg.Graphics,0,0,1) rg.Style.Spacing.All = 10 Doc.Body.Children.Add(rg) \'.............. rt.Cells(0,0).Text= "二维码" rt.Cells(0,1).Text =  \'..................... Doc.Preview() 帮助里的图片换成二维码 http://www.foxtable.com/webhelp/topics/1238.htm

--  作者：狐狸爸爸 --  发布时间：2019/10/2 8:59:00 --   RenderGraphics就是一个普通的打印对象，和RenderText是一回事，任何打印对象都可以直接加入单元格中： http://www.foxtable.com/webhelp/topics/1199.htm