以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  生成的二维码读不出内容  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=191710)
--  作者：zhuxinhui
--  发布时间：2024/5/4 15:51:00
--  生成的二维码读不出内容

Dim doc As New PrintDoc
Dim rg As prt.RenderGraphics
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.QRCode
Doc.Stacking = prt.StackingRulesEnum.InlineLeftToRight
For Each r As Row In Tables("表A").Rows
    bar.Code = r("第一列")
    rg = new prt.RenderGraphics
    bar.DrawOnCanvas(rg.Graphics,0,0,1)
    rg.Style.Spacing.All = 3
    Doc.Body.Children.Add(rg)
Next
Doc.Preview()

　使用这些代码生成的二维码，微信读不出内容的
--  作者：zhuxinhui
--  发布时间：2024/5/4 16:27:00
--  
用支付宝可以描出来，微信就不行
有微信也可以读取的吗？
--  作者：有点蓝
--  发布时间：2024/5/5 20:37:00
--  
无解，微信自己的问题