使用Excel VBA
打开Excel ,创建两个工作表,分别命名为“小山羊”和“数据”。在“数据”表格
中存放数据,共49行,这是1-16行的数据,这是17-32行的数据,这是33-49行的数据。
进入VBE编程环境,插入模块。
编程,通过读取“数据”表格里的数据,给“小山羊”表格里相应的单元格涂色,这里我们涂的是黑色。
设置“小山羊”表格区域单元格的列宽和行高,以控制整个图形显示的大小。
关闭VBE,在“数据”表格内启动宏,执行宏。
运行结果就是一只简笔画小山羊。
使用Python和turtle库
导入turtle库
```python
import turtle as t
```
定义绘制羊的函数
```python
def drawBody():
t.penup()
t.setheading(-90)
t.forward(-100)
```
定义绘制羊腿的函数
```python
def drawLegs():
t.penup()
t.goto(-50, 100)
t.pendown()
t.forward(100)
t.left(90)
t.forward(100)
t.left(90)
t.forward(100)
t.left(90)
t.forward(100)
t.left(90)
t.forward(100)
t.penup()
t.goto(0, 100)
```
定义绘制羊头的函数
```python
def drawHead():
t.penup()
t.goto(0, 0)
t.pendown()
t.circle(50, 180)
t.circle(25, 90)
t.circle(25, 270)
```
定义主程序
```python
def main():
t.speed(1)
t.color("black")
t.pensize(3)
drawBody()
drawLegs()
drawHead()
t.done()
```
运行主程序
```python
if __name__ == "__main__":
main()
```
使用Python和turtle库绘制喜羊羊
导入turtle库
```python
import turtle as tt
```
设置屏幕大小
```python
tt.screensize(600, 720)
```
定义绘制线条的函数
```python
def plotLine(points, pencolor=None, width=None, speed=None):
oldpencolor = tt.pencolor()
oldwidth = tt.width()
oldspeed = tt.speed()
if pencolor is not None:
tt.pencolor(pencolor)
if width is not None:
tt.width(width)
if speed is not None:
tt.speed(speed)
tt.up()
tt.goto(points)
tt.down()
for point in points[1:]:
tt.goto(point)
tt.pencolor(oldpencolor)
tt.width(oldwidth)
tt.speed(oldspeed)
```