单元8-高级程序设计教学课件8-11绘图控件-Shape控件-Line控件.pptx

VB,程序设计,,,绘图控件-Shape控件-Line控件,,,问题引入,这些图形在VB中如何实现？,,,,,列表框,,绘图控件,,形状控件Shape,1,形状控件Shape用于在窗体或图片框中绘制常见的几何图形形状控件Shape,常用属性,(1) Shape属性,提供了6 种预定义的形状，取值为0～5的整型值3—Circle (圆形) 4—Rounded Rectangle (圆角矩形) 5—Rounded Square (圆角正方形),,2—Oval (椭圆形),0—Rectangle (矩形),1—Square (正方形),,,,,,,形状控件Shape,1,利用Shape控件的Shape属性显示各种形状示例】,利用控件数组来实现很方便代码设计,运行结果,,形状控件Shape,1,用来设置填充Shape控件样式取值为0～7之间的整数值0—Solid (实线) 1—Transparent (透明-缺省值) 2—Horizontal Line (水平直线) 3—Vertical Line (垂直直线) 4—Upward Diagonal (上斜对角线) 5—Downward Diagonal (下斜对角线) 6—Cross (十字线) 7—Diagonal Cross (交叉对角线),(2) FillStyle属性,,形状控件Shape,1,利用Shape控件的FillStyle属性显示各种填充效果。

示例】,代码设计,运行结果,代码中的If…Else…End If语句的作用是什么？,,形状控件Shape,2,设置填充 Shape 控件颜色当FillStyle属性不等于1时可以看出效果3)FillColor属性,利用Shape控件的FillStyle属性显示各种填充效果示例】,运行结果,,直线控件Line,2,可在窗体、框架或图片框中画各种形式的简单线段Line 控件功能有限，只用来完成最简单的画线任务直线控件Line,,绘图应用,3,利用Shape控件的FillStyle属性显示各种填充效果应用】,代码设计,代码中的“Int(Rnd * 225 + 30)”起什么作用？,,总 结,,,,知识在于积累,。