Bonjour a tous,
Je developpe actuellement sous VB.Net un logiciel de generation de piece automatique et pour se faire j'aurais besoin de savoir si une cote nommée existe mais aucun moyen de trouver cela dans l'aide solidwokrs est ce que quelqu'un aurait une piste
Actuellement je change la cote de cette maniere mais aucun moyen de savoir si le changement a reussi ou non :/
Part.Parameter(CoteToChange.).SystemValue = Round(CoteToChange.Value, 0) / 1000
Bonjour,
Mais si la cote n'existe pas, le programme va renvoyer une erreur, non ?
Dans ce cas, il faut se référer à la gestion des erreurs :
Avec un "On error go to" et un message ou un avertissement par exemple.
http://gilmir.developpez.com/tutoriels-vb6/tutoriel16/
En fait j'ai trouvé une réponse ici :
https://forum.solidworks.com/thread/64245
Merci .PL
Le code que j'ai adapté en VB.net donne ceci
Dim swModel As SldWorks.ModelDoc2 = swApp.ActiveDoc Dim swDim As SldWorks.Dimension = swModel.Parameter("NutThickness@Sketch1") If Not swDim Is Nothing Then MsgBox("NutThickness@Sketch1 Find") Else MsgBox("NutThickness@Sketch1 Not Find") End If