vba-绘图篇

之前孟哥说有人用excel来画图，我也想着试一下。

去年学习了一下ps，了解了图像是如何成像的。简单来说就是由N个像素点构成的。在一定尺寸的图片中。像素点越多，图像越细腻。（应该是这么回事吧！外行人不太精通）。

画画需要画笔、橡皮擦、颜料、画板。

其中颜料。颜色可以由cmyk或者是rgb表示。这里由于vba中正好有rgb函数。所以就使用rgb了。rgb（i，j，k）。三个值分别代表红绿蓝三原色，根据这几个值构成各种颜色。。例如红色是rgb(255,0,0)。修改不同的rgb值就可以得到不同的颜色。

然后还需要做个橡皮擦，就是将将颜料变成白色

接下来是做画板
画板就是将excel中每一个单元格作为一个像素点，先将他们变成白色，去掉边框。
在这里现在1000*1000个像素点。代码如下

然后是画笔，画笔就是在excel中使用Worksheet_SelectionChange,即excel选择的单元格发生改变之后，自动触发程序

完成到这一步就可以开始作画了

不足之处：
1、码运行速度依旧有点慢。
2、由于点只能一个一个走，作图速度还是很慢的。而且颜色要不断调
3、颜色的录用太麻烦，添加一种颜色就需要加入一个按钮。当然，解决办法，就是将i、j、k值使用文本框输入的办法。可以在旁边添加一个窗口给出一些常用颜色的rgb值。
这个绝对不是优秀的作图思路，就是练习一下vba罢了。当然了，有同学发现了娱乐价值就更好了。
下面是视频展示（略有快进）
[iframe]https://mp.weixin.qq.com/mp/readtemplate?t=pages/video_player_tmpl&action=mpvideo&auto=0&vid=wxv_889246174904041472[/iframe]