怎么将一个常量复制进内存

菜鸟冒充老鸟A

如题。
比如说，我编了一个命令getXxx，计算出了一个结果a，这个结果是个数值，怎么在每次计算完后将这个数值复制进剪贴板？
效果就是，每次我使用完命令getXxx后，直接Ctrl V就可以粘贴结果了。

谢谢

fan_zh

[功能] 向系统剪贴板写入文字
(defun SET-CLIP-STRING (STR / HTML RESULT)
    (and (= (type STR) 'STR)
         (setq HTML (vlax-create-object "htmlfile"))
         (setq RESULT (vlax-invoke
                          (vlax-get (vlax-get HTML 'PARENTWINDOW)
                                    'CLIPBOARDDATA
                          )
                          'SETDATA
                          "Text"
                          STR
                      )
         )
         (vlax-release-object HTML)
    )
)

Lewis

想要这个功能