프로그래밍을 일상 생활속으로

Assembly Modeling '----------------------------------------------------------------------------------------------------- 'Create a collection to hold the joints Dim JointCollection As New Collection Dim JointFactory As New HgrJointFactory Dim AssemblyJoint As Object ' pipe length is changed along given axis Set AssemblyJoint = JointFactory.MakePrismaticJoint(HGR_PIPE, "BeginCap" , HGR_PIPE, "EndCap" , 3565 ) ' NOTICE 3565''' JointCollection.Add AssemblyJoint ' create logical connection to route with revolute joint Set AssemblyJoint = JointFactory.MakeRevoluteJoint(CONNECTION, "Connection" , - 1 , "Route" , 17 ) JointCollection.Add AssemblyJoint ' connect pipe to logical connection Set AssemblyJoint = JointFactory.MakeRigidJoint(HGR_PIPE, "BeginCap" , CONNECTION, "Connection" , 9444 ) JointCollection.Add AssemblyJoint ' create vertical joint. ...

1. Programming Resource  설치 2. Support VB  프로젝트 열기 3. 디버깅을 위한  SP3D Host  프로젝트 추가하기 4. 시작 프로젝트로 설정합니다 . 5. 프로젝트 속성에서 프로젝트 형식을 표준  EXE 로 설정합니다 . 6. PART  모델링 PART  모델링시 결과를 확인하고 프로그램을 종료하기 전에   UNDO   하십시오 . UNDO 하지 않고 프로그램을 종료하면 해당  PART 가 캐쉬에 저장되어 캐쉬를 삭제하지 않는 이상 해당  PART 를 디버깅할수 없습니다 . 7. Assembly  모델링 [출처]   Support Programming | 작성자   행복사냥 [출처]   Support Programming | 작성자   행복사냥 [출처]   Support Programming | 작성자   행복사냥 [출처]   Support Programming | 작성자   행복사냥 [출처]   Support Programming | 작성자   행복사냥 [출처]   Support Programming | 작성자   행복사냥