VB其他常用的语句及控件演示教学.pptVIP

包括：Click、DblClick、MouseMove、MouseDown和MouseUp等事件 1．鼠标事件过程格式 后三种鼠标事件与Click、DblClick事件不同的是可以区分鼠标的左、右、中键与Shift、Ctrl、Alt键。 鼠标事件过程的语法格式为： Private Sub 对象名_鼠标事件(Button As Integer,Shift As Integer, X As Single,Y As Single) 说明：(1) Button参数表示哪个鼠标键被按下或释放。用0，1，2位分别表示鼠标的左、右、中键，用1或0表示被按下或释放 10.7.2 鼠标事件     2 1 0 位 ······ 左键 右键 中键 3. 图片框的使用 (1)显示和消除图形：见Picture属性 (2)用Print方法向图片框输出文本 (3)用图形方法在图片框中画图形 可以使用Circle(画圆)、Line(画线)、Pset(画点)等方法在图片框中画图形 示例 Private Sub Form_Load() Show Picture1.Print 在图片框内写字和画圆  Picture1.Circle(1200, 1000), 600, RGB(0, 0, 255) Picture1.PSet(1200, 1000), RGB(255, 0, 0) End Sub 10.4.4 图像框(Image) 图像框(Image)控件的作用与图片框PictureBox控件相似，但它只能用于显示图形，不能作为其他控件的容器 10.4.5 Shape形状控件 VB提供了画图形的基本工具，如Shape(形状控件)、Line(线控件)。 Shape控件和Line控件只用于表面装饰，不支持任何事件。 10.4.6 Line直线控件 Line直线控件可用来在窗体、框架和图片框中绘制简单的线段。 (1)分析：本例分别以Second、Minite和Hour函数取得系统时间 Time的秒、分和时数，再利用计时器控件，按一定时间间隔把时 间数转换为图形指针位置和显示出来 (2)创建应用程序的用户界面 计时器(Timer1)，形状控件(Shape1)，三条线控件(LineS, LineM, LineH) ，四个标签(表示数字) 例10.8 设计一个走动的时钟 (3)设置对象属性 Timer1的Interval属性为1000(1秒) Shape1的Shape属性为3-Circle(圆形)，FillStyle属性为0-Solid(实心) LineS, LineM, LineH的BorderWidth属性为1，2，4 (4)编写程序代码 Option Explicit Const pi = 3.14159 Private len_S As Single, len_M As Single, len_H As Single Private Sub Form_Load() ‘先取各指针的长度 秒针长度 len_S = Sqr((LineS.Y2 - LineS.Y1) ^ 2 + (LineS.X2 - LineS.X1) ^ 2)