如何得到ＡＵＴＯＣＡＤ命令执行过程中选择对象的选择集合

sealive

当ＡＵＴＯＣＡＤ命令执行过程中，比如ＥＲＡＳＥ命令，执行时提示选择对象，当选择后如何获得本命令执行过程中选择的对象的选择集合？用ＶＢＡ如何实现？

hangc

在AcadDocument_EndCommand事件中截获需要处理的命令，在这个时候选择集还存在，可获的当前选择集。