Prompt 方法 (ActiveX)
在命令行上显示提示符。 支持的平台:仅限 Windows 返回值 (RetVal)无返回值。 言论没有其他评论。 例子VBA: 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
可视化 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-30 07:11
Powered by Discuz! X3.4
Copyright © 2001-2021, Tencent Cloud.