Compatibilité C# VB.net

Bonjour,

J'ai un problème lorsque j'utilise un Sample en C#.

En C#, cette fonction fonctionne ( Pas drôle :oops:)

Code:

---

1 2 3 4 5 6

RsIrc5Controller rsIrc5Controller = (RsIrc5Controller)task.Parent; //Get virtual controller instance from RsIrc5Controller ABB.Robotics.Controllers.Controller controller = new ABB.Robotics.Controllers.Controller(new Guid(rsIrc5Controller.SystemId.ToString())); //get task ABB.Robotics.Controllers.RapidDomain.Task vTask = controller.Rapid.GetTask(task.Name);

---

Lorsque je la traduis en VB.net avec un converter j'obtiens ceci :

Code:

---

1 2 3 4 5

Dim rsIrc5Controller As RsIrc5Controller = DirectCast(task.Parent, RsIrc5Controller) 'Get virtual controller instance from RsIrc5Controller Dim controller As New ABB.Robotics.Controllers.Controller(New Guid(rsIrc5Controller.SystemId.ToString())) 'get task Dim vTask As ABB.Robotics.Controllers.RapidDomain.Task = controller.Rapid.GetTask(task.Name)

---

Malhereusement, il existe un problème de Cast que je ne peux outrepasser.

Après plusieurs essais, je me remets donc à vous.

Merci d'avance

Citation:

---

Envoyé par ekydeta

Bonjour,

J'ai un problème lorsque j'utilise un Sample en C#.

En C#, cette fonction fonctionne ( Pas drôle :oops:)

Code:

---

1 2 3 4 5 6

RsIrc5Controller rsIrc5Controller = (RsIrc5Controller)task.Parent; //Get virtual controller instance from RsIrc5Controller ABB.Robotics.Controllers.Controller controller = new ABB.Robotics.Controllers.Controller(new Guid(rsIrc5Controller.SystemId.ToString())); //get task ABB.Robotics.Controllers.RapidDomain.Task vTask = controller.Rapid.GetTask(task.Name);

---

Lorsque je la traduis en VB.net avec un converter j'obtiens ceci :

Code:

---

1 2 3 4 5

Dim rsIrc5Controller As RsIrc5Controller = DirectCast(task.Parent, RsIrc5Controller) 'Get virtual controller instance from RsIrc5Controller Dim controller As New ABB.Robotics.Controllers.Controller(New Guid(rsIrc5Controller.SystemId.ToString())) 'get task Dim vTask As ABB.Robotics.Controllers.RapidDomain.Task = controller.Rapid.GetTask(task.Name)

---

Malhereusement, il existe un problème de Cast que je ne peux outrepasser.

Après plusieurs essais, je me remets donc à vous.

Merci d'avance

---

Essaye avec CType() qui est plus permissif que DirectCast()

http://stackoverflow.com/questions/3...type-in-vb-net

Citation:

---

Essaye avec CType() qui est plus permissif que DirectCast()

http://stackoverflow.com/questions/3...type-in-vb-net

---

Merci de ta réponse, mais avec un CType j'obtiens une erreur du même type.

Bonjour,

Le type de task.Parent est il RsIrc5Controller ?

Si c'est le cas, alors ceci ne fonctionne pas (?) :

Code:

---

Dim rsIrc5Controller As RsIrc5Controller = task.Parent

---

Si en revanche ce ne sont pas les même types, alors le DirectCast ne fonctionnera pas, effectivement.
Et dans ce cas, je me demande ce qui est fait en C# pour que ça fonctionne...

Citation:

---

Envoyé par ekydeta

Merci de ta réponse, mais avec un CType j'obtiens une erreur du même type.

---

Ça serait sans doute plus simple avec le message d'erreur exact qui est renvoyé (si ça se trouve le problème vient d'ailleurs dans la conversion entre C# et VB.Net mais n'est visible qu'arrivé à ce niveau là du code)

Bonjour,

Je présume que tu y as pensé mais bon. Vérifie tes références dans l'Explorateur de solution. Si tu vois un manquant, tu supprimes la vieille référence et tu en établis une nouvelle.

Sinon, je suis d'accord avec l'idée de fournir le texte exact du message d'erreur.

Bonjour,

Merci à vous pour les messages. En effet, cela provenait pas du CType/DirectCast mais d'une déclaration supplémentaire qu'il fallait rajouter en VB.net spécifique à mon SDK.

Cordialement,