代码改变世界

随笔档案-2011年3月20日

小小的折腾一下

2011-03-20 23:55 by 精诚所至 金石为开, 196 阅读, 收藏,
摘要： 什么东西看的时间长了都会腻的，这就叫喜新厌旧，WP默认主题虽然强大但是单调，决定换成宽屏主题：Fluid Blue theme，这个主题是相当简洁，不过界面比默认主题漂亮多了，不小心搞了2个小时，改字体大小，换代码，重新整理插件。 累。 接着努力学习VBA。 阅读全文

AutoCAD VBA创建椭圆和样条曲线

2011-03-20 20:24 by 精诚所至 金石为开, 898 阅读, 收藏,
摘要： AutoCAD VBA创建椭圆和样条曲线，代码如下。 Public Function AddEllipse(ByVal ptCen As Variant, ByVal ptmajAxis As Variant, ByVal radRatio As Double) As AcadEllipse Set AddEllipse = ThisDrawing.ModelSpace.Add... 阅读全文

AutoCAD VBA创建圆弧

2011-03-20 19:40 by 精诚所至 金石为开, 906 阅读, 收藏,
摘要： AutoCAD VBA创建圆弧，已经圆心、起点和终点；圆心、起点和角度；三点法；圆心、起点和弧长等。代码如下。 ‘模块中代码 Public Function AddArcCSEA(ByVal ptCen As Variant, ByVal radius As Double, ByVal stAng As Double, ByVal enAng As Double) As AcadAr... 阅读全文

AutoCAD VBA创建圆

2011-03-20 16:52 by 精诚所至 金石为开, 501 阅读, 收藏,
摘要： AutoCAD VBA创建圆，包括利用圆心半径、圆心直径、两点法和三点发四种方式，代码如下。 Public Function AddCircle(ByVal ptCen As Variant, ByVal radius As Variant) As Variant Dim objCir As AcadCircle Set objCir = ThisDrawing.Mode... 阅读全文

AutoCAD VBA基本多段线操作

2011-03-20 15:46 by 精诚所至 金石为开, 1383 阅读, 收藏,
摘要： AutoCAD VBA基本多段线操作，包括创建直线，圆，圆弧等，代码如下。 Public Function AddLWPline(ByRef pt() As Double, ByVal width As Double) As AcadLWPolyline Dim objPline As AcadLWPolyline If (UBound(pt) + 1) Mod 2 0... 阅读全文

分享一套FLASH视频教程

2011-03-20 15:29 by 精诚所至 金石为开, 260 阅读, 收藏,
摘要： 很悲剧，这个刚才发过一遍了，用WLW发布那个分享FLASH殿堂之路和动画教程的时候，忘了新建日志，结果直接把这个覆盖了，只能再发一遍。 视频在线观看地址：http://www.youku.com/playlist_show/id_5360219.html。 视频打包下载地址：http://u.115.com/file/t4434db08c。 优酷视频可以用IKU软件下载，在视频播放地址下面点... 阅读全文

分享两本FLASH教程PDF版电子书

2011-03-20 15:06 by 精诚所至 金石为开, 420 阅读, 收藏,
摘要： 一本是Flash.ActionsCript3.0动画教程，一本是Flash.ActionScript3.0殿堂之路。 相当不错的电子书，殿堂之路相对简单，建议新手看，动画教程是外国牛人编写的，对新手来说可能有点吃力，不过这本书我还是强力推荐，如果能坚持看完的话，相信你的编程技术会上升一个台阶。 殿堂之路下载地址：http://u.115.com/file/f4782e787b。 动画教程下载... 阅读全文

瑞星杀毒永久免费

2011-03-20 12:18 by 精诚所至 金石为开, 204 阅读, 收藏,
摘要： 3月17日，超级月亮，可惜上海下雨。 3月18日，瑞星杀毒宣布个人用户永久免费。 详情地址：http://www.rising.com.cn/free/index.html。 有机会试试。 阅读全文