To je záludná otázka. :)) Myslím, že v Catii V5 nebude integrován novější VBA. Možná že dojde ke změně v Catia V6.
Obecně se dá říct VBA 6 (Catscript) stačí na základní makra. Výhodou je jednoduchost kódu a rychlost vykonání skriptů. VBA 6.3+ je zakomponován v Catii.
Programátoři využívají i jiné jazyky pro spouštění maker -
VBA 2008,Visual Basic .NET, Perl, C++, C#,Microsoft .NET-Framework 2.0
a další. Tyto jazyky jsou myslím pro složitější aplikace s propojením s databází.
Př. http://www.cadsim-gmbh.de/download.htm

CAA RADE je programovací prostředí pro CATII a využívá C++. Všechny nadstavby pro Catii, např. Validat,Q-Checker,NTtool a jiné. Instalace je docela drahá, řádově více caa 50000 Eur. Používají ji zkušení programátoři a firmy, které na to mají.
Tyto aplikace mají tu výhodu, že jsou součástí Catie a využívají ji přímo.

Tady máte kus kódu...
Musíte ještě ve VB nalinkovat knihovny, to je vidět na obrazku...

Public Class Form1

Dim CATIA As INFITF.Application = GetObject(, "CATIA.Application")

Dim Adoc As INFITF.Documents

Dim UserSelection1 As INFITF.Selection

Dim reference1 As INFITF.References

Dim VisPropertySet1 As INFITF.VisPropertySet

Private Sub Form1_Load() Handles MyBase.Load

   CATIA = GetObject(, "CATIA.Application")

   Adoc = CATIA.Documents

End Sub



Private Sub VIS() Handles VIS.Click

  'Bílá barva

   UserSelection1 = CATIA.ActiveDocument.Selection

   If UserSelection1.Count > 0 Then



      For I = 1 To UserSelection1.Count

         'MsgBox(UserSelection1.Item(I).Value.Name)

          VisPropertySet1 = UserSelection1.VisProperties

          VisPropertySet1.SetRealColor(255, 255, 255, 1)

      Next



   End If

End Sub

Vloudila se malá chybička, na konci kódu chybí End Class...
Jinak též děkuji za příklad, i já uvažuji o tom, že bych se pustil do VB2008EE, Catiovský VB6 má sice opravdu lepší odezvu, ale jeho možnosti jsou na dnešní dobu už trochu omezené.

Ještě prosím o radu...
Pokud vytvořím makro v VB2008.net, tak knihovny jenž si nalinkuji do referencí musí být umístěné ve spouštěcím adresáři - tzn. tam kde je .exe soubor makra. Jak se tohoto lze zbavit?
Všechny PC ve firmě mají Catii ve stejném instalačním adresáři a já jsem nucen potřebné .dll knihovny zbytečně kopírovat do adresáře kde spouštím makro. Jak lze nastavit absolutní cesta na referenční knihovny? Děkuji.

To ano, ale stejně je to "ošklivost" kamkoliv kopírovat knihovny, jenž jsou na každém PC v instalačním adresáři Catie. Když jsem kdysi zkoušel dělat programy v VB6, tak to nevyžadoval. Ve VB2008net to ale tak musím dělat - je to určitě jen v nastavení...jenže kde...
Takhle když dám někomu z externích firem makro, dám mu místo jednoho .exe souboru celkem 5 souborů (a 4 znich má již na svém počítači).

Omlouvám se, ale jak jsem uvedl výše, jsem začátečník. Prokousávám se samotným prostředím VB.net, takže jsem ve fázi, kdy dokážu vytvořit formulář a z něj spustit nějakou funkci. Ale není mi právě vůbec jasné, jak propojit naprogramované makro s Catií (předpokládám, že je to právě přes linky knihoven) ... zde bych potřeboval opravdu trochu polopatické "nakopnutí". Dostal jsem se do fáze - New Project - Windows application ... View code - tady jsem vyplnil kód a tím jsem skončil.

Ještě jsem zapomněl dodat. Abyste pro deklarace proměnných mohl používat stejný způsob jako v interním editoru Catie, uveďte úplně na začátku kódu toto:

Imports INFITF

Imports ProductStructureTypeLib

Tím naimportujete nalinkované knihovny a všechny objekty, vlastnosti a metody Catie z těchto knihoven se pak budou objevovat v nabídce Intelisense Visual Studia (samozřejmě je třeba importovat vše co používáte).
Pak namísto složitého

Dim oProduct As ProductStructureTypeLib.Product

stačí jen

Dim CATIA As Application

Dim oProduct As Product

atd.

Postup pro zpětné přepnutí je následující:

V příkazové řádce vpravo dole napiště "c: options" a potvrďte enterem. Otevře se menu Options. Najeďte na záložku General, kde jste přepnul na z P2 na P3. Sice tu není nic vidět, ale přepínače jsou na svých místech, stačí se myší trefit do správného místa. Jakmile to přepnete, Catia ohlásí, že je třeba restart.

Po restartu je vše OK.

PS: Proč to proboha píšete sem? Tady by vám nikdo neodpověděl...