Selection Problems(MasterCam VB)

[cansucuoglu]

Hello;

I have been writing in VB for Rhino for a long while. I have just started for masterCam and things hasnt been running so smooth so far... I think I have a very basic question. If I can get the basics I can do anything right?

Well the code below is trying to go through a selection and moving them one by one. How would you do this?
Or is there a good refernce for masterCam VB. The one in MasterCam is not that great..

Thanks



Call First()
Sub First()

Dim Selection
Dim s



Call Shapes()
Selection = SelectAll()

For Each s In Selection

Select(s)
Translate 0,0,0,5,5,0,mcVIEW_TOP,mcVIEW_TOP,False
UnselectAll()
Next




End Sub

[sanjeevlj]

If you people got solution to previous problem also try to solve my probelem with print screen in mastercam-vba
standard code in VB not working with mastercam-vba
thanks