Draw an egg(2)

It'salso easy to draw an egg with the curve y^2=(sin(x)*(1+cos(x)/π)). PrivateSubForm_Click() Me.Caption="Drawanegg" DimpiAsSingle,XAsSingle pi=4*Atn(1) Me.Scale(-1,-2)-(4,2) ForX=0TopiStep0.0005 Me.C

>>阅读原文<<