請問如何用VB畫出多邊形(編號:8927)

請問如何畫出多邊形,在From上點一下,然後拖曳出多邊形
如果可以請寄程式碼給我,謝謝各位的幫助...Thank you.