以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 变量获取到列的值被截断  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=185983)

--  作者:liaobus
--  发布时间:2023/3/29 23:01:00
--  [求助] 变量获取到列的值被截断


有如下代码:

If e.DataCol.Name = "字段A" Then
    If e.NewValue = "未购" Then 
         e.DataRow("购买日期") = Nothing 
        e.DataRow("金额") = 0 
    Else If e.NewValue = "已购" 
        Dim dr As DataRow
        Dim rev As String = e.DataRow("REV编码")       
        dr = DataTables("项目").Find("[REV编码] =" & rev)
        If dr IsNot Nothing Then
            e.DataRow("金额") = dr("费用")
            e.DataRow("购买日期") = Date.Today 
        End If
    End If
End If

运行后 提示 :REV编码 找不到;

而 Dim rev As String = e.DataRow("REV编码")   获取到的字段值 是  REV202302  实际的值是 REV202302-002

这个是什么原因呢?如何改善?
请老师指教。



--  作者:有点蓝
--  发布时间:2023/3/30 8:47:00
--  
建议先看几遍这个帮助:http://www.foxtable.com/webhelp/topics/1284.htm

dr = DataTables("项目").Find("[REV编码] =\'" & rev & "\'")
--  作者:liaobus
--  发布时间:2023/3/30 9:15:00
--  
谢谢   老师。
我这确实学艺不精啊!!!