以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  字符转换问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143189)

--  作者:Davidwu
--  发布时间:2019/11/16 18:16:00
--  字符转换问题
Dim filter2 As String ="[凭证号]=\'" & drs("凭证号") & "\'" And "[借贷方]=\'贷方\'"

Dim Cols5() As String={"财务金额","科目名称","凭证号","日期","科目代码","科目名称英"}
Dim Cols6() As String={"贷方","科目名称","凭证号","日期","科目代码","科目名称英"}
For Each dr5 As DataRow In DataTables("明转账子表").Select(filter2)
    Dim dr6 As DataRow = DataTables("财务子表").addnew()
    For i As Integer = 0 To Cols3.length-1
        dr6(Cols6(i))=dr5(Cols5(i))
    Next
Next
按钮执行后,系统显示
从字符串"[凭证号]=’A20110003‘到类型“Long”的转换无形效

--  作者:有点蓝
--  发布时间:2019/11/17 19:52:00
--  
Dim filter2 As String ="[凭证号]=\'" & drs("凭证号") & "\' And [借贷方]=\'贷方\'"