请问如何在使用command调用CHAMFER时模拟按下shift键？

vbnewer

在使用CHAMFER时可按住shift键以应用角点，那么使用command调用CHAMFER选择直线时如何同时模拟按下shift键？
当然通过设置D值可以到达同样的效果，但这样D值就被改变了，如果不想改变D值，我觉得按下shift键选择直线最为理想。