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
以上代码执行起来的结果不符合要求，但是不知道如何修改？谢谢。
加好友 
发短信
Post By：2019/1/18 19:46:00 [只看该作者]
