cad中用vba调整图层顺序

在cad中，如何用vba语句调整图层顺序，有cad自带的命令语句吗

http://bbs.mjtd.com/forum.php?mod=viewthread&tid=67358