Adapter un script avec VB 2008 Express

Bonjour,
J'ai un script je voudrai adapter avec le VB 2008 Express, et j'ai des petits soucis si vous pouvez me donner des renseignements. Voici le script généré :
Code:

1 2 3 4 5 6 7 Dim Grapher As Object Set Grapher = CreateObject("Grapher.Application") Grapher.Visible = True Set pmgr40_01_05z = Grapher.Documents.Open("D:\Projets\Grapher7\Data\Modeles\Ancien\pmgr40_01_05z.grf") Set Graph1 = pmgr40_01_05z.Shapes.Item(1) Set PM5 = Graph1.Plots.Item(4) PM5.Select
Ce bout de program ouvre un fichier existant et sélectionne le graphique dans ce fichier et sélectionne la courbe dans ce graphique etc....

J'ai essayé de l'adapter avec le VB 2008 et j'ai des problèmes suivants : le Set pmgr40_01_05z... le VB 2008, il ne veut pas je n'ai que le SetAttr... ainsi les Set Graph1 et le Set PM5 VB2008 me rejette également.

Merci de votre réponse.

Code:

1
2
3
4
5
6
Dim Grapher As Object = CreateObject("Grapher.Application")
Grapher.Visible = True
dim pmgr40_01_05z as object =  Grapher.Documents.Open("D:\Projets\Grapher7\Data\Modeles\Ancien\pmgr40_01_05z.grf")
dim Graph1 as object = pmgr40_01_05z.Shapes.Item(1)
dim PM5 as object = Graph1.Plots.Item(4)
PM5.Select

Bonjour,

Merci pour la réponse il fonctionne sans souci.