Bu CATIA API fonksiyonu ne işe yarar?
Fonksiyon: InfInterfaces Camera3D (Object)
Cevap:
Dim MyCamera As Camera3D
 Set MyCamera = CATIA.ActiveWindow.ActiveViewer.NewCamera()
 MyCamera.
Viewpoint3D
.Zoom = 2
 CATIA.ActiveWindow.ActiveViewer.Viewpoint3D = MyCamera.
Viewpoint3D