以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  长代码缩短  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=153264)

--  作者：qaz17909 --  发布时间：2020/8/5 15:10:00 --  长代码缩短 代码过长想通过内部函数缩短行数，使用内部函数整合代码时，我是用StringBuilder整合 Dim sb As New StringBuilder sb.AppendLine(“代码”) sb.AppendLine("代码") Dim code As String = sb.ToString return code 但代码里有引号的时候报错，如："项目 = ‘“ & r("项目") & ”’ AND 分类 = ‘“ & r("分类") & ”’" 应如何更改，或者还有其他更好的方法吗？

--  作者：有点蓝 --  发布时间：2020/8/5 15:18:00 --   参考：http://www.foxtable.com/webhelp/topics/0211.htm