以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=134085)

--  作者:gaolei
--  发布时间:2019/4/26 21:55:00
--  [求助]
For Each tx As WinForm.Control In e.Form.Controls
Dim c As WinForm.TextBox = tx
If c.Value<>""
Dim s As String
s = s "\'& :\'"\' & c.value &""\'
End If
Next
Tables("资金流水_出纳").Current("进项税明细") = s

老师,这段代码s = s "\'& :\'"\' & c.value &""\'老是显示应为语句结束是啥意思啊

--  作者:gaolei
--  发布时间:2019/4/26 21:57:00
--  
还有老师,关于那个单双引号的应用感觉帮助里面写的不清楚啊,看了好多遍了,感觉碰到实际应用的时候还是有点懵啊
--  作者:有点蓝
--  发布时间:2019/4/26 22:06:00
--  
Dim s As String
For Each tx As WinForm.Control In e.Form.Controls
    If Typeof tx Is WinForm.TextBox
        Dim c As WinForm.TextBox = tx
        If c.Value > ""
            s = s & ":" & c.value
        End If
    End If
Next
Tables("资金流水_出纳").Current("进项税明细") = s.Trim(":")

单引号是表达式条件才用到的,比如筛选条件、SQL语句