以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]有一串字符串,里面写了代码,如何让字符串的代码执行?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=154476)

--  作者:zto001
--  发布时间:2020/9/16 0:35:00
--  [求助]有一串字符串,里面写了代码,如何让字符串的代码执行?
[求助]有一串字符串,里面写了代码,如何让字符串的代码执行?
--  作者:有点蓝
--  发布时间:2020/9/16 9:00:00
--  
参考:http://www.foxtable.com/webhelp/topics/1487.htm
--  作者:zto001
--  发布时间:2020/9/16 9:25:00
--  
我不用自定义函数,自定义函数一用的话,整个代码都得而是存储的。我需要写在代码里缺少的一段
比如
Dim Bar As New BarCodeBuilder
Bar.Symbology = Barpro.Symbology.Code128
Bar.Code = "75376451448390"
Bar.BarWidth = 0.5     这里是保存在文字里的代码
Bar.BarRatio = 3
Bar.BarHeight = 9
Bar.QuietZoneWidth = 2
Bar.Font = New Font("微软雅黑",9,FontStyle.Bold)
Bar.TextFont = New Font("微软雅黑",9,FontStyle.Bold)
img = new prt.RenderImage
    img.Image = bar.GetImage
rt.Cells(4,4).Image = img 

--  作者:有点蓝
--  发布时间:2020/9/16 9:35:00
--  
只能使用自定义函数