Tags do not hide when created with VBA in CONNECT Edition

RE: Tags do not hide when created with VBA in CONNECT Edition

Carl Stanton — Wed, 03 Nov 2021 14:29:14 GMT

This appears to work, thank you very much.

RE: Tags do not hide when created with VBA in CONNECT Edition

Artur Goldsweer — Wed, 03 Nov 2021 10:39:10 GMT

Hi Carl,

I can confirm this is an open Bug # 661690 with placing tags.
The workaround would be to explicitly set .IsHidden = true after attaching the tag to an element.
This could be such a code example:

    Set oTag = element.AddTag(oTagdef) 
    oTag.IsHidden = True    ' hide after adding tag
    oTag.Rewrite            ' rewrite in dgn

I hope this helps?

Best regards,

Artur

RE: Tags do not hide when created with VBA in CONNECT Edition

Carl Stanton — Tue, 02 Nov 2021 17:14:38 GMT

dgn file and an example VBA source code are attached. The relevant VBA function is also below. communities.bentley.com/.../INSERT_5F00_TRACK.mvba

vba source code:

Public Sub AddTagDefinitions(TagSetName As String)
Dim oDefs As TagDefinitions

Set oTagSet = oTagSets.Add(TagSetName)
'Creating TagSets
Set oDefs = oTagSet.TagDefinitions

Set oTagDef = oTagSet.TagDefinitions.Add("FUN_ID", msdTagTypeCharacter)
With oTagDef
.IsHidden = True
.IsConstant = False
End With
Set oTagDef = oDefs.Add("ANGLE", msdTagTypeCharacter)
With oTagDef
.IsHidden = True
.IsConstant = False
End With
Set oTagDef = oDefs.Add("TSI", msdTagTypeCharacter)
With oTagDef
.IsHidden = True
.IsConstant = False
End With
Set oTagDef = oDefs.Add("MISC", msdTagTypeCharacter)
With oTagDef
.IsHidden = True
.IsConstant = False
End With
End Sub

communities.bentley.com/.../ctec_5F00_cad.dgnlib

RE: Tags do not hide when created with VBA in CONNECT Edition

Jon Summers — Tue, 02 Nov 2021 16:44:36 GMT

You're probably aware that Bentley Systems tell us that tags are deprecated in MicroStation CONNECT. However, many people, like yourself, use tags and have written code to handle tags. They are unlikely to disappear from MicroStation in this decade.

However, Bentley Systems would rather that we concentrate on new, shiny, features like Item Types. I suspect that the developers don't plan to put any emphasis on fixing bits of the tag API that don't work, but I'll be happy to read a statement to the contrary.

[quote userid="1167984" url="~/products/programming/microstation_programming/f/microstation-programming---forum/221589/tags-do-not-hide-when-created-with-vba-in-connect-edition"]when I run my custom VBA blocks elements are drawn with all tags visible[/quote]

Please provide some evidence...

A DGN file that includes your tag defs
VBA function source code that creates tag elements

RE: Tags do not hide when created with VBA in CONNECT Edition

Carl Stanton — Tue, 02 Nov 2021 16:30:37 GMT

Version 10.16.01.56

RE: Tags do not hide when created with VBA in CONNECT Edition

Jon Summers — Tue, 02 Nov 2021 14:05:44 GMT

[quote userid="1167984" url="~/products/microstation/f/microstation-forum/221589/tags-do-not-hide-when-created-with-vba-in-connect-edition"]VBA in CONNECT Edition[/quote]

What is the exact version no. (e.g. v10.x.y.z) of MicroStation that you are using? Use key-in VERSION to see the version no. in the MicroStation Message Center, or Help→About MicroStation in the backstage.

See this blog that shows you how to obtain MicroStation's version number.

There is a Programming Forum that would be a better place to post your question about VBA. You can move your post using the More=>Move button.