Quantcast
Channel: MicroStation Programming Forum - Recent Threads
Viewing all articles
Browse latest Browse all 7260

Microstation 8i, vba, level

$
0
0

I notice something strange. I have a cell with one of the elements on "Level 2".  When I get the element information on the cell, I can see that the particular element is on level = "Level 2".  In VBA, when I scan the DGN file I notice the oEllipse.Level.Name = "" and not "Level 2".  I wanted to compare the oEllipse.Level.Name = "Level 2".  The work around I created was using the level number (which works) as follows:

If (oCellSubElmEnumerator.Current.Type = msdElementTypeEllipse) Then
      Set oEllipse = oCellSubElmEnumerator.Current

      Set oLevelTwo = ActiveDesignFile.Levels("Level 2")

      'If (oEllipse.Level.Name = "Level 2") Then
      If (oEllipse.Level.Number = oLevelTwo.Number) Then

             ............

My question is: Why is oEllipse.Level.Name = ""  and not oEllipse.Level.Name = "Level 2"

Dilip Bhandarkar


Viewing all articles
Browse latest Browse all 7260

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>