Visual LISP 與 ActiveX/VBA 的比較

Visual LISP 與 ActiveX/VBA 的比較	Visual LISP 與 ActiveX/VBA 的比較
Visual LISP 與 ActiveX/VBA 的比較

下表比較了 Visual LISP 函數與相似的 ActiveX^®、VBA 及 Visual Basic 6 函數和運算子。 ActiveX Automation 對等值由「AutoCAD.Application」指示，並將 Visual Basic 6 對等值列示為函數或運算子。

Visual LISP 與 ActiveX/VBA 的比較
AutoLISP 函數	ActiveX、VBA 或 Visual Basic 6 對等值
+ (加)	+ (加運算子)
- (減)	- (減運算子)
* (乘)	* (乘運算子)
/ (除)	/ (除運算子)
= (等於)	= (等於比較運算子)
/= (不等於)	<> (不等於比較運算子)
< (小於)	< (小於比較運算子)
<= (小於或等於)	<= (小於或等於比較運算子)
/= (不等於)	<> (不等於比較運算子)
> (大於)	> (大於比較運算子)
>= (大於或 等於)	>= (大於或等於比較運算子)
~ (按位元否)	Not 運算子
1+ (增量)	使用 + (加運算子)
1- (減量)	使用 - (減運算子)
abs	Abs 函數
acad_colordlg	未提供
acad_helpdlg	搜尋線上說明索引中的 HELP
acad_strlsort	搜尋線上說明索引中的 SORT
action_tile	使用對話方塊編輯器
add_list	使用對話方塊編輯器
ads	AutoCAD.Application.ListADS 方法
alert	MsgBox 函數
and	And 運算子
angle	AutoCAD.Application.ActiveDocument.Utility. AngleFromXAxis 方法
angtof	AutoCAD.Application.ActiveDocument.Utility.GetInteger 方法
angtos	AutoCAD.Application.ActiveDocument.Utility. AngleToString 方法
append	使用陣列操控函數
apply	未提供
arx	AutoCAD.Application.ListARX 方法
arxload	AutoCAD.Application.LoadARX 方法
arxunload	AutoCAD.Application.UnloadARX 方法
ascii	Asc 函數
assoc	未提供
atan	Atn 函數
atof	CDbl 函數
atoi	CInt 函數
atom	搜尋線上說明索引中的 IS
atoms-family	未提供
autoarxload	未提供
autoload	未提供
Boole	使用邏輯運算子
boundp	搜尋線上說明索引中的 IS
car/cdr	使用陣列操控函數
chr	Chr 函數
client_data_tile	使用對話方塊編輯器
close	AutoCAD.Application.Documents.Close 方法
command	AutoCAD.ActiveDocument.SendCommand 方法
cond	Select Case 陳述式
cons	使用陣列操控函數或 AutoCAD.Application.collection.Add<entityname> 方法
cos	Cos 函數
cvunit	使用轉換函數
defun	關鍵字函數和 End 函數
dictadd	AutoCAD.Application.ActiveDocument.Dictionaries.Add 方法
dictnext	AutoCAD.Application.ActiveDocument.Dictionaries.Item 方法
dictremove	AutoCAD.Application.ActiveDocument.Dictionaries. Dictionary.Delete 方法
dictrename	AutoCAD.Application.ActiveDocument.Dictionaries. Dictionary.Rename 方法
dictsearch	AutoCAD.Application.ActiveDocument.Dictionaries. Dictionary.GetName 和 GetObject 方法
dimx_tile 和 dimy_tile	使用對話方塊編輯器
距離	AutoCAD.Application.Utility.GetDistance 用於交談式方法。
distof	未提供
done_dialog	使用對話方塊編輯器
end_image	使用對話方塊編輯器
end_list	使用對話方塊編輯器
entdel	AutoCAD.Application.ActiveDocument.collection_object. Delete 方法
entget	AutoCAD.Application.ActiveDocument.collection_object. property 性質
entlast	AutoCAD.Application.ActiveDocument.Modelspace. Item(count-1)
entmake	AutoCAD.Application.ActiveDocument.Modelspace. Add<entityname> 方法
entmakex	AutoCAD.Application.ActiveDocument.Modelspace. Add<entityname> 方法
entmod	使用物件的任何讀寫性質
entnext	AutoCAD.Application.ActiveDocument.collection.Item 方法
entsel	AutoCAD.Application.ActiveDocument.SelectionSets 物件/方法/性質
entupd	AutoCAD.Application.ActiveDocument.Modelspace.物件. Update 方法
eq	未提供
equal	Eqv 運算子
*error*	Error 物件/方法/性質
eval	未提供
exit	AutoCAD.Application.Quit 方法
exp	Exp 函數
expand	未提供
expt	^ (指數運算子)
fill_image	使用對話方塊編輯器
findfile	Dir 函數
fix	Fix、Int、Cint 函數
float	CDbl 函數
foreach	For Each...Next 陳述式
gc	AutoCAD.Application.ActiveDocument.PurgeAll
gcd	未提供
get_attr	使用對話方塊編輯器
get_tile	使用對話方塊編輯器
getangle	AutoCAD.Application.ActiveDocument.Utility.GetAngle 方法
getcfg	AutoCAD.Application.Preferences.property 性質
getcname	未提供
getcorner	AutoCAD.Application.ActiveDocument.Utility.GetCorner 方法
getdist	AutoCAD.Application.ActiveDocument.Utility.GetDistance 方法
getenv	AutoCAD.Application.Preferences.property 性質
getfiled	使用檔案對話方塊
getint	AutoCAD.Application.ActiveDocument.Utility.GetInteger 方法
getkword	AutoCAD.Application.ActiveDocument.Utility.GetKeyword 方法
getorient	AutoCAD.Application.ActiveDocument.Utility. GetOrientation 方法
getpoint	AutoCAD.Application.ActiveDocument.Utility.GetPoint 方法
getreal	AutoCAD.Application.ActiveDocument.Utility.GetReal 方法
getstring	AutoCAD.Application.ActiveDocument.Utility.GetString 方法
getvar	AutoCAD.Application.GetVariable 方法
graphscr	AppActivate AutoCAD.Application.Caption
grclear	Obsolete 函數
grdraw	未提供
grread	未提供
grtext	AutoCAD.Application.ActiveDocument.Utility.Prompt
grvecs	未提供
handent	AutoCAD.Application.ActiveDocument.ModelSpace.object. Handle 性質
help	搜尋線上說明索引中的 HELP
if	If… Then… Else 陳述式
initget	AutoCAD.Application.ActiveDocument.Utility. InitializeUserInput
inters	AutoCAD.Application.ActiveDocument.Modelspace.物件. IntersectWith
itoa	Str 函數
lambda	未提供
last	arrayname(UBound(arrayname))
長度	UBound 函數
list	ReDim 陳述式
listp	IsArray 函數
load_dialog	使用對話方塊編輯器
load	AutoLISP 不會經由 Automation 受到支援
log	Log 函數
logand	And 函數
logior	Or 函數
lsh	Imp 函數
mapcar	未提供
max	Max 函數
mem	未提供
member	Use 集合
menucmd	AutoCAD.Application.MenuBar 物件
menugroup	AutoCAD.Application.MenuGroup 物件
min	Min 函數
minusp	使用 < 0 語法
mode_tile	使用對話方塊編輯器
namedobjdict	AutoCAD.Application.ActiveDocument.Dictionaries 集合
nentsel	AutoCAD.Application.ActiveDocument.SelectionSets. SelectionSet.SelectAtPoint 方法
nentselp	AutoCAD.Application.ActiveDocument.SelectionSets. SelectionSet.SelectAtPoint 方法
new_dialog	使用對話方塊編輯器
not	使用邏輯運算子
nth	使用 object(n) 語法
null	IsNull 函數
numberp	TypeName 函數
open	Open 函數
or	使用邏輯運算子
osnap	未提供 (您可以使用 SetVariable 方法來控制系統變數 OSMODE。)
環形	AutoCAD.Application.ActiveDocument.Utility.PolarPoint 方法
prin1	AutoCAD.Application.ActiveDocument.Utility.Prompt
princ	AutoCAD.Application.ActiveDocument.Utility.Prompt
print	AutoCAD.Application.ActiveDocument.Utility.Prompt
progn	未提供
prompt	AutoCAD.Application.ActiveDocument.Utility.Prompt
quit	AutoCAD.Application.Quit 方法
quote	未提供
read	未提供
read-char	Input 函數
read-line	Line Input 函數
redraw	AutoCAD.Application.ActiveDocument.Modelspace.物件. Update 方法
regapp	AutoCAD.Application.ActiveDocument. RegisteredApplications.Add 方法
rem	Mod 函數
repeat	For… Each, While,
reverse	未提供
rtos	AutoCAD.Application.ActiveDocument.Utility.RealToString 方法
set	Set 函數
set_tile	使用對話方塊編輯器
setcfg	AutoCAD.Application.Preferences.property 性質
setfunhelp	未提供
setq	Set 函數
setvar	AutoCAD.Application.SetVariable 方法
sin	Sin 函數
setview	AutoCAD.Application.ActiveDocument.Viewports.Viewport. SetView 方法
slide_image	使用對話方塊編輯器
snvalid	未提供
sqrt	Sqr 函數
ssadd	AutoCAD.Application.ActiveDocument.SelectionSets.Add 方法
ssdel	AutoCAD.Application.ActiveDocument.SelectionSets. SelectionSet.Delete 方法
ssget	AutoCAD.Application.ActiveDocument.SelectionSets. SelectionSet.SelectOnScreen 方法
ssgetfirst	未提供
sslength	AutoCAD.Application.ActiveDocument.SelectionSets. SelectionSet.Count 方法
ssmemb	比較物件的 ID 和 SelectionSet 成員
ssname	AutoCAD.Application.ActiveDocument.SelectionSets. SelectionSet.Name 性質
ssnamex	未提供
sssetfirst	AutoCAD.Application.ActiveDocument.PickfirstSelectionSet
startapp	Shell 函數
start_dialog	使用對話方塊編輯器
start_image	使用對話方塊編輯器
start_list	使用對話方塊編輯器
strcase	StrConv 函數
strcat	& 運算子
strlen	Len 函數
subst	未提供
substr	Mid 函數
數位板	未提供
tblnext	AutoCAD.Application.ActiveDocument.collection_object. Item 方法
tblobjname	AutoCAD.Application.ActiveDocument.collection_object. Name 方法
tblsearch	AutoCAD.Application.ActiveDocument.collection_object. Name 方法
term_dialog	使用對話方塊編輯器
terpri	未提供
textbox	AutoCAD.Application.ActiveDocument.space.object. GetBoundingBox 方法
textpage	未提供
textscr	未提供
trace	未提供
trans	AutoCAD.Application.ActiveDocument.Utility. TranslateCoordinates 方法
type	TypeName 函數
unload_dialog	使用對話方塊編輯器
untrace	未提供
vector_image	使用對話方塊編輯器
ver	AutoCAD.Application.Version 性質
vports	AutoCAD.Application.ActiveDocument.Viewports 集合
wcmatch	Like 運算子
while	While… Wend
write-char	Print 函數
write-line	Print 函數
xdroom	未提供
xdsize	未提供
zerop	使用 = 0 語法