织物组织CAD软件的开发.pptVIP

第六章织物组织CAD软件的开发;一、CAD系统功能概述;二、菜单设计;建立下拉式菜单;三、分别建立各子模块;控件属性调整：

Form：caption属性改为：平纹

Picturebox属性：Autoredraw设为：true；Height、width、scaleheight、scalewidth均设为相同的值，如6000

Commandbutton的caption属性分别为：绘图、退出

Frame的caption属性为：参数选择

Label的caption属性为：循环次数

Text的text设定为：默认值，如10

单选按钮分别设定caption为：单起、双起

将单起对应的单选按钮的value设为：true

;代码编写：

通用模块部分：

Dimx,y,w,hAsSingle

Dimi,jAsInteger

DimnAsInteger

Dima()AsInteger

退出按钮：

PrivateSubCommand2_Click()

UnloadMe

EndSub

;绘图按钮（第一部分）

PrivateSubCommand1_Click()

Picture1.Cls清除上次的画图

Picture1.BackColor=RGB(255,255,255)设置图片框背景色白色

DrawWidth=1划线宽度为1

x=0起点