在AutoCAD中，使用LISP编程语言可以计算仅由拟合点定义的样条曲线的端点切线。下面是一个示例代码：

(defun calculate-spline-tangent ()
    (setq points '(
        (0.0 0.0)
        (1.0 1.0)
        (2.0 2.0)
        (3.0 1.0)
        (4.0 0.0)
    ))

    ; 创建样条曲线对象
    (setq spline (vlax-invoke-method (vlax-get-acad-object) 'addSpline points))

    ; 获取样条曲线的起点和终点
    (setq start-point (vlax-get-property spline 'startpoint))
    (setq end-point (vlax-get-property spline 'endpoint))

    ; 获取样条曲线的起点和终点的切线向量
    (setq start-tangent (vlax-get-property spline 'starttangent))
    (setq end-tangent (vlax-get-property spline 'endtangent))

    ; 输出切线向量
    (princ (strcat "起点切线向量：" (vl-princ-to-string start-tangent) "\n"))
    (princ (strcat "终点切线向量：" (vl-princ-to-string end-tangent) "\n"))

    ; 删除样条曲线对象
    (vla-delete spline)
)

; 调用函数计算切线向量
(calculate-spline-tangent)

以上示例代码创建了一个由5个拟合点定义的样条曲线对象，并计算了该曲线的起点和终点的切线向量。你可以根据需要修改points列表中的拟合点坐标。