用visuallisp，而不是lisp，lisp在CAD中无法运行

抱歉，似乎您混淆了两个概念。实际上，在AutoCAD环境中，VisuAlLisp (VLA) 和 Lisp 是互补使用的。VisuAlLisp是AutoCAD提供的一种图形化脚本环境，它是Lisp的一个子集，设计用于更直观地创建、编辑和运行Lisp代码。

Lisp在CAD中是可以直接运行的，而VisuAlLisp是在图形界面上提供了一种可视化的工具，使得Lisp代码的创建和调试更为便捷，尤其适合初学者。通过VisuAlLisp编辑器，用户可以直接编写、测试和执行Lisp脚本，而不必在命令行界面中输入复杂的命令模式。

如果您想用VisuAlLisp而非纯文本的Lisp命令，可以创建一个新的VBA（Visual Basic for Applications）模块，然后编写类似下面的VBA代码，它模拟了一个简单的功能：

Sub RenameBlock()
    DimblkName As String
    blkName = InputBox("请输入要修改名称的块")
    
    If Not IsNull(blkName) Then
        For Each obj In Selection '遍历选定的对象
            If obj.Type = acBlock Then
                If obj.Name = blkName Then
                    obj.Name = blkName '修改块名称
                End If
            End If
        Next obj
    Else
        MsgBox "请输入块名"
    End If
End Sub

然后在AutoCAD中调用这个VBA函数来完成操作。