PLM之家精品课程培训,联系电话:18301858168 QQ: 939801026

  • NX二次开培训

    NX二次开培训

    适合初级入门或想深入了解二次开发的工程师,本培训结合ufun,NXOpen C++,大量的实例及官方内部的开发技术对于老鸟也值得借鉴!.

    NX CAM二次开发培训报名 NX二次开发基础培训报名
  • PLM之家Catia CAA二次开发培训

    Catia二次开发培训

    Catia二次开发的市场大,这方面开发人才少,难度大。所以只要你掌握了开发,那么潜力巨大,随着时间的积累,你必将有所用武之地!

  • PLM之Teamcenter最佳学习方案

    Teamcenter培训

    用户应用基础培训,管理员基础培训,管理员高级培训,二次开发培训应有尽有,只要你感兴趣肯学习,专业多年经验大师级打造!

  • PLM之Tecnomatix制造领域培训

    Tecnomatix培训

    想了解制造领域数字化吗?想了解工厂,生产线设计吗?数字化双胞胎,工业4.0吗?我们的课程虚位以待!

PLM之家PLMHome-国产软件践行者

[资料] NX二次开发源码分享: 创建视图到指定方向

[复制链接]

2018-3-24 09:25:27 1882 0

admin 发表于 2018-3-24 09:25:27 |阅读模式

admin 楼主

2018-3-24 09:25:27

请使用QQ关联注册PLM之家,学习更多关于内容,更多精彩原创视频供你学习!

您需要 登录 才可以下载或查看,没有账号?注册

x
) z! z' p. J# n
NX二次开发源码分享: 创建视图到指定方向' l/ w3 O- a* E
% f4 ?9 r8 T) `5 r
[mw_shl_code=c,true]Imports System
; u! k: r9 S6 p- ~Imports NXOpen& R8 L7 q7 V$ e" g" I
" J. ^7 W4 C" l1 ^
Module TrimetricViewFromBelow) A3 l* z# b1 K" L% a
. V) K) M. |, [8 p: x6 r
    Sub Main (ByVal args() As String) 9 i% u; g$ V$ S0 d) n
6 F! m. f9 v4 {" @) X4 m
        Dim theSession As Session = Session.GetSession()
/ A  e8 p' o6 l4 `& r) S        Dim basePrt As BasePart = theSession.Parts.BaseWork& @2 W9 y& c% i! i
        Dim workPart As CAE.CaePart = Nothing
* ?! o6 ]) F9 h8 ^3 I7 U, z8 v& O
        Dim origin1 As Point3d = Nothing
9 r* X  |; |! p5 \) q/ o9 Z' p- }        Dim vector1 As Vector3d = Nothing- d* @- _! K- Q5 L8 m
, ]# c' v5 J1 q& b5 f2 \2 D$ \! j
        Dim Xx As Double = 0.63121905864762995  ' 50.86 deg
/ |$ w: g5 T5 \* _& b5 o8 p        Dim Xy As Double = 0.77560460287442845  ' 39.14 deg
% D" M  t* {. z, A5 n& z0 M, T- }        Dim Xz As Double = 0.0
$ ^5 r2 t* x- x9 v5 _1 F* r        Dim angle As Double = -44.0
- L) `8 {! W$ d& ]; N; H$ S) I# h8 x* z6 v# E* G! y5 y
        If (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.FemPart)) Then
0 |% y9 {# s$ S9 V            workPart = CType(theSession.Parts.BaseWork, CAE.SimPart)
, j# x5 |+ z4 D" Z5 v: `1 o# `0 v        ElseIf (Not (basePrt Is Nothing) And Not (TypeOf basePrt Is CAE.SimPart)) Then! b$ m" A- j/ Z2 V% g1 M
            workPart = CType(theSession.Parts.BaseWork, CAE.FemPart)
: k& @! l; \9 f" b# {3 Z; \        End If
' Y9 F- e+ q* l, E2 B3 ~0 \! `+ u6 U2 \% ~& h  E! `
        workPart.ModelingViews.WorkView.Orient(View.Canned.Trimetric, _# J* c8 ^9 o+ p
                                               View.ScaleAdjustment.Fit)1 e  x6 O$ _; Z$ A

* r3 T7 Q7 n0 J+ F+ g5 l; |+ r        origin1 = workPart.ModelingViews.WorkView.AbsoluteOrigin
; p2 o- [$ ?7 j/ d# E1 K  [   
# \) Z& E5 P  B' [% K3 F        vector1 = New Vector3d(Xx, Xy, Xz)
+ m* F6 l' W( L: i! ]$ y    : v5 }3 O2 u) U& K
        workPart.ModelingViews.WorkView.Rotate(origin1, vector1, angle)0 p) G+ ^* F6 d( h3 j

- j& H. r1 w* K' u3 s0 H3 t6 a        workPart.ModelingViews.WorkView.Fit(). ?; d$ q0 n  Z, F  H
/ o) l. g! t" e) K. C% ~- L
    End Sub
/ S9 m& V/ }9 W7 c7 F' J* m( `9 H" M7 d6 n, n/ C. M2 `& R3 |
End Module
2 }: ], c6 V1 ]( b( Y, A8 l' negative trimetric view[/mw_shl_code]
# K3 s7 ?) `! ^
上海点团信息科技有限公司,承接UG NX,CATIA,CREO,Solidworks 等CAx软件,Teamcenter,3D Experience等PLM软件,工业4.0数字化软件的实施\二次开发\培训相关业务,详情QQ 939801026 Tel 18301858168 网址 www.diantuankj.com/ doTeam.tech
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 注册

返回列表 本版积分规则

  • 发布新帖

  • 在线客服

  • 微信

  • 客户端

  • 返回顶部

  • x
    温馨提示

    本网站(plmhome.com)为PLM之家工业软件学习官网站

    展示的视频材料全部免费,需要高清和特殊技术支持请联系 QQ: 939801026

    PLM之家NX CAM二次开发专题模块培训报名开始啦

    我知道了