从DiagramObject.Style中仅检索BCol

Question

我可以通过使用这个来获取我的EA组件的样式：

             dim ajay
            ajay = diagramObject.Style
            Session.Output(ajay)

，我得到的输出是：

DUID=01ABDAAA;BCol=16764057;LCol=-1;LWth=1;

我想只有BCol而不是其他参数，因为我不需要帮助他解决这个问题。

Answer 1

尝试这样的事情：

sub main
    dim test 
    test = "DUID=01ABDAAA;BCol=16764057;LCol=-1;LWth=1;"
    dim key
    key = "BCol="
    dim splitted
    splitted = Split(test,";")
    dim keyValue
    for each keyValue in splitted
        if left(keyValue, len(key))= key then
            Session.Output keyValue
            exit for
        end if
    next
end sub

main