主题：代码起不了作用

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