Pentagram: Difference between revisions
→{{header|VBA}}
SqrtNegInf (talk | contribs) (Added Perl example) |
|||
Line 1,178:
</lang>
=={{header|VBA}}==
<lang vb>Sub pentagram()
With ActiveSheet.Shapes.AddShape(msoShape5pointStar, 10, 10, 400, 400)
.Fill.ForeColor.RGB = RGB(255, 0, 0)
.Line.Weight = 3
.Line.ForeColor.RGB = RGB(0, 0, 255)
End With
End Sub</lang>
=={{header|zkl}}==
{{trans|Perl 6}}
| |||