Zdravim potřeboval bych poradit.
Mam v Excelu neco hotového co mě chodi na Acad 2002 LT.
A ted se pokušim o podobnou věc v VB 2005 Expres Editon a moc se mě nedaří,mohl někdo na to mrknout a popostrčit mě trochu  diky moc všem.
Private Sub CommandButton1_Click()With Dialog1vpr = 20 * CDbl(TextBox1.Text)End Withstr1 = "_circle 0,0 " + CStr(vpr) + " "AppActivate ("AutoCAD LT")    chanelNumber = Application.DDEInitiate("AutoCAD LT.DDE", "System")    Application.DDEExecute chanelNumber, str1    Unload MeEnd Sub

Velmi dik postrčím se sám.
Příspěvky co jsem našel se týkají Excelu a nebo Vba v plném cadu.
Tím pádem se budu muset opet vrátit do Excelu.
A doinstalovat Ofice od Microsoftu.

napis celej kod z tohodle se nedá nic urcit, reklbych ze nemas nastavený dde

Předem dik za váš čas.
Ještě chci upozornit že toho o vb moc nevim,ten kod co jsem publikoval výše je vyjmutej z Excelu.
 
Mam tam jednoduchej formulář s jednim tlacitkem a textovým oknem a ten kod je z toho tlacitka.Které v acad2002LT nakreslí kružnici na bode 0,0  a poloměrem 20*vetší ze zadané hodnoty v textbox1.
 
Instaloval VB 2005 Expres Editon že bych si neco podobného zkusil zkompilovat do spustitelné podoby (*.exe)
 
 

snad vam pomuye toto
 
Private Sub Command1_Click()   Text1.LinkMode = 0 '0 = reset Text1.LinkTopic = "AutoCAD LT.DDE|system" 'establish DDE link Text1.LinkMode = 2  '2 = manual connection Text1.LinkExecute "_filedia" & Chr(13) & "0" & Chr(13)   Text1.LinkExecute "_plot" & Chr(13)   Text1.LinkExecute "L" & Chr(13) & "N" & Chr(13)   Text1.LinkExecute "_filedia" & Chr(13) & "1" & Chr(13)   End Sub

Dik zkoušel jsem to a asi mě něco uniká deklaroval jsem Text1
 

Toto mě naběhne :
 
Warning 1 Variable 'Text1' is used before it has been assigned a value. A null reference exception could result at runtime. 
 
 
deklaroval jsem: Dim Text1
 

na formu musíte mít textbox text1

Na frm. mam :  command1
 
                        text1
 
Warning 1 Variable 'Text1' is used before it has been assigned a value. A null reference exception could result at runtime. 

Pise vám to že používáte text1 aniž došlo k jeho inicializaci, provádíte s ním něco přeh load form?