Visual Basic语言程序设计及实验教程课件：键盘鼠标事件和图形操作.ppt

例：编写程序，在鼠标左键单击窗体位置显示彩色的“*”，如图所示，当鼠标右键单击窗体时清除窗体信息。PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=1Then按下左键则输出*CurrentX=XCurrentY=YForeColor=QBColor(Rnd*16)Print*ElseClsEndIfEndSub9.1图形操作基础9.2绘图属性9.3图形方法9.4图形方法应用9.5图形控件9.1图形操作基础9.1.1坐标系统1．坐标的概念2．坐标刻度与单位⑴使用缺省刻度单位⑵选择标准刻度单位值常数说明0VbUser用户自定义坐标系统1VbTeips缇。这是缺省刻度。1，440缇等于一英寸。2VbPoints磅。72磅等于一英寸。3VbPixels像素。像素是监视器或打印机分辨率的最小单位。4VbCharacters字符。打印时，一个字符有1/6英寸高、1/12英寸宽。5VbInches英寸。6VbMillimeters毫米。7VbCentimeters厘米。ScaleMode属性设置值9.1.2自定义坐标系统1．用坐标属性定义坐标系统可以使用对象的ScaleLeft、ScaleTop、ScaleWidth和ScaleHeight四个属性，来创建自定义坐标。例:通过坐标属性定义窗体Form1的坐标系。例:如果窗体Froml左上角坐标为(-200,250)，右下角坐标为(300,-150)。则x轴和y轴的正向分别为（）A.向右、向下B.向左、向上C.向右、向上D.向左、向下2．使用坐标方法定义坐标系统使用Scale方法定义坐标系统的格式：[对象名.]Scale(x1,y1)–(x2,y2)例:通过使用Scale方法义窗体Form1的坐标系。9.2绘图属性9.2.1当前坐标图形输出对象的当前坐标CurrentX、CurrentY属性用于返回或设置在窗体或图片框中，下一次打印或绘图方法的水平(CurrentX)和垂直(CurrentY)坐标。9.2.2线宽对象名.DrawWidth[=size]9.2.3线型对象名.DrawStyle[=number]FillColor指定填充的颜色，默认的填充颜色与输出对象的ForeColor相同。FillSytle属性指定填充的图案。9.2.4填充9.2.5颜色1．颜色属性⑴BackColor属性⑵ForeColor属性⑶BorderColor属性⑷FillColor属性2.颜色函数与颜色整数使用颜色函数RGB和QBColor，还可以直接使用十进制整数或十六进制整数⑴可以用HBBGGRR形式的6位十六进制数或十进制整数描述颜色。十六进制数的左边应加字母H，按照三基色原理，从最低字节到最高字节依次决定红(RR)、绿(GG)和蓝(BB)的量。红、绿和蓝的量分别由一个介于0～255(H00～HFF)之间的数来表示。表示RGB颜色的十进制数值的取值范围0(HO00000)～16,777,215(HFFFFFF)。例如：060000表示深绿色。⑵可以使用系统提供的描述颜色的常量。vbBlackH0黑色vbRedHFF红色vbGreenHFF00绿色vbYellowHFFFF黄色vbBlueHFF0000蓝色vbMagentaHFF00FF洋红vbCyanHFFFF00青色vbWhiteHFFFFFF白色⑶使用RGB(r,g,b)函数。RGB(255,0,O)表示红色RGB(0，255,0)表示绿色RGB(O,O,255)表示蓝色RGB(255,255,0)表示黄色RGB(255,0,255)表示紫色RGB(0，255