在PowerPoint中绘制Scribble形状

Question

请看下面的图片：

我在scrribble中绘制了一个五点星形状。

我的问题是：

如何通过VBA代码执行相同的操作。