Zobrazit plnou verzi příspěvku: Argumenty pre VB z ACADu

Sirus
27.07.2005, 10:49
Potreboval by som vediet ako preniest argumenty z Acadu do VB,
nieco ako -vbrun texty (0 "a" "b")

funkcia vo VB je definovana:

Sub texty (cislo text1 text2)
 ...
End sub

Neviem ako to spravne zapisat do autocadu...


Vladimír Michl
27.07.2005, 11:15
takhle to asi nepůjde, ale můžete použít:
[CODE]Sub texty ()cislo = ThisDrawing.Utility.GetString(False)text1 = ThisDrawing.Utility.GetString(False)text2 = ThisDrawing.Utility.GetString(False)...[/CODE]
a volat to:[CODE](command "_-VBARUN" " texty " "1234.5" "priklad1" "priklad2")[/CODE]
 

Sirus
27.07.2005, 11:23
Funguje to skvele.

Dakujem