在命令行上显示提示符。 支持的平台:仅窗口 返回值(RetVal)无返回值。 言论没有额外的评论。 例子工 务 局: Sub Example_Prompt()
' This example will use the Utility object to display a prompt to the
' AutoCAD command line. To see the results after running the example,
' switch to AutoCAD and look at the command line.
ThisDrawing.Utility.Prompt "Press any key..."
End Sub
Visual LISP: (vl-load-com)
(defun c:Example_Prompt()
;; This example will use the Utility object to display a prompt to the
;; AutoCAD command line. To see the results after running the example,
;; switch to AutoCAD and look at the command line.
(setq acadObj (vlax-get-acad-object))
(setq doc (vla-get-ActiveDocument acadObj))
(vla-Prompt (vla-get-Utility doc) "Press any key...")
)
|
|Archiver|CAD开发者社区
( 苏ICP备2022047690号-1 苏公网安备32011402011833)
GMT+8, 2025-10-29 05:55
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.