以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  代码起不了作用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=130330)
--  作者：edisontsui
--  发布时间：2019/1/18 19:46:00
--  代码起不了作用
If r("制造产品号").startswith("K")
    rt.Text = "原料: " & r("原材料")
Else
    If r("型号").Contains("45100-42") Or r("型号").Contains("45100-43") Or r("型号").Contains("77100-003-01") Or r("型号").Contains("77100-004-01")
        rt.Text = "原料: " & r("原材料") & " * 6.35mm"
    elseIf r("型号").Contains("76400-100") 
        If r("型号").Contains("UL") Or r("型号").Contains("JQ")   
             rt.Text = "原料: " & r("原材料") & " * 3.20mm"
        Else 
             rt.Text = "原料: " & r("原材料") & " * 3.00mm"
        End If
    elseIf r("型号").Contains("SP-76400-032")   
        rt.Text = "原料: " & r("原材料") & " * 3.20mm"  
    else
        rt.Text = "原料: " & r("原材料")
    End If
end if

以上代码执行起来的结果不符合要求，但是不知道如何修改？谢谢。
--  作者：有点蓝
--  发布时间：2019/1/18 21:11:00
--  
首先完整代码贴出来。

其次想实现什么功能，得到什么效果？
--  作者：edisontsui
--  发布时间：2019/1/18 21:39:00
--  
rt = New prt.RenderText 

想实现的结果：

如果“制造产品号”字头有K， 打印的内容就是："原料: " & r("原材料")

如果制造产品号字头没有K

     那么，如果“型号”含 45100-42 或者 45100-43 或者 77100-003-01 或者 77100-004-01，打印的内容就是："原料: " & r("原材料") & " * 6.35mm"
           如果“型号”含 76400-100 
           那么，如果“型号”含 UL 或者 JQ，那么，打印的内容就是："原料: " & r("原材料") & " * 3.20mm"
                 否则，打印的内容就是："原料: " & r("原材料") & " * 3.00mm"
           如果 “型号”含 SP-76400-032 ，那么，打印的内容就是： "原料: " & r("原材料") & " * 3.20mm"
     其他情况， 打印的内容就是："原料: " & r("原材料")
--  作者：有点蓝
--  发布时间：2019/1/18 21:51:00
--  
代码没有问题。截图说明一下具体哪个数据不符合要求。注意Contains是区分大小写的