I look at your code deeply and it looks like a bug in iLogic but I'm not sure.
If I test your code, it gives me different results in GeometryIntent. The underlying geometry from part view is Face but the geometry from assembly is EdgeProxy.
This is the reason, why your code doesn't work. It is not a solution how to create angular dimension.
Test code:
Dim Sheet_1 = ThisDrawing.Sheets.ItemByName("Sheet:1")
Dim VIEW1 = Sheet_1.DrawingViews.ItemByName("VIEW1")
Dim VIEW2 = Sheet_1.DrawingViews.ItemByName("VIEW2")
Dim ViewPt_BottomMid = VIEW1.SheetPoint(0.5, 0)
Dim ViewPt_TopMid = VIEW1.SheetPoint(0.5, 1)
'Create GeometryIntents for View1 and View2
Dim view1Intent1 = VIEW1.GetIntent("094902HYD:1", "Face0", nearPoint :=ViewPt_BottomMid)
Dim view1Intent2 = VIEW1.GetIntent("094902HYD:1", "Face0", nearPoint :=ViewPt_TopMid)
Dim view2Intent1 = VIEW2.GetIntent("Face0", nearPoint :=ViewPt_BottomMid)
Dim view2Intent2 = VIEW2.GetIntent("Face0", nearPoint :=ViewPt_TopMid)
'Get model geometry type
Dim view1Type1 As ObjectTypeEnum = view1Intent1.Geometry.ModelGeometry.Type
Dim view1Type2 As ObjectTypeEnum = view1Intent2.Geometry.ModelGeometry.Type
Dim view2Type1 As ObjectTypeEnum = view2Intent1.Geometry.ModelGeometry.Type
Dim view2Type2 As ObjectTypeEnum = view2Intent2.Geometry.ModelGeometry.Type
'Print results
Logger.Debug("View1 (Assembly):")
Logger.Debug("view1Type1: {0}", view1Type1)
Logger.Debug("view1Type2: {0}", view1Type2)
Logger.Debug("View2 (Part):")
Logger.Debug("view2Type1: {0}", view2Type1)
Logger.Debug("view2Type2: {0}", view2Type2)
'Highlight results
VIEW1.ModelDocument.SelectSet.Select(view1Intent1.Geometry.ModelGeometry)
VIEW1.ModelDocument.SelectSet.Select(view1Intent2.Geometry.ModelGeometry)
VIEW2.ModelDocument.SelectSet.Select(view2Intent1.Geometry.ModelGeometry)
VIEW2.ModelDocument.SelectSet.Select(view2Intent2.Geometry.ModelGeometry)
Results:
