林卓然VB教程课件绘图菜单第10章教案.ppt
《林卓然VB教程课件绘图菜单第10章教案.ppt》由会员分享,可在线阅读,更多相关《林卓然VB教程课件绘图菜单第10章教案.ppt(42页珍藏版)》请在得力文库 - 分享文档赚钱的网站上搜索。
1、主页主页 VBVB中的常用控件分为两类:一是中的常用控件分为两类:一是标准控件,二是标准控件,二是ActiveXActiveX控件。控件。默认情况下工具箱中只有标准控默认情况下工具箱中只有标准控件,用户也可通过件,用户也可通过“工程工程”菜单中的菜单中的“部件部件”命令添加所需的命令添加所需的ActiveXActiveX控件。控件。主页主页 第第1010章章 绘图、菜单及其他控件功能绘图、菜单及其他控件功能框架框架(Frame)滚动条滚动条(ScrollBar)图形方法和图形控件图形方法和图形控件菜单设计菜单设计工具栏和状态栏工具栏和状态栏键盘与鼠标事件键盘与鼠标事件对话框对话框 通用通用/自
2、定义自定义制作制作Web浏览器浏览器GOTO语句和几个定义语句语句和几个定义语句本章主要内容退出退出主页主页 1.框架的用途框架的用途 作为容器放置其他控件对象,将这些控件对象分成可标识的控作为容器放置其他控件对象,将这些控件对象分成可标识的控件组;框架内的所有控件将随框架一起移动、显示和消失。件组;框架内的所有控件将随框架一起移动、显示和消失。(框架示例:框架示例:“幻灯片放映幻灯片放映”“设置放映方式设置放映方式”对话框对话框)例例10.1 控制文本的字体、字号及颜色控制文本的字体、字号及颜色 在窗体上设置在窗体上设置3个框架个框架Frame1、Frame2和和Frame3 10.110.
3、1 框架框架(Frame)(Frame)框架框架Frame3Frame3框架框架Frame2Frame2框架框架Frame1Frame1例例10.1主页主页(2)(2)编写程序代码编写程序代码 功能要求:功能要求:在三个框架中分别选择字体、字号和颜色,单在三个框架中分别选择字体、字号和颜色,单击击“确定确定”按钮后,文本框中的文本相应属性会发生变化按钮后,文本框中的文本相应属性会发生变化 Private Sub Form_Load()Option1.Value=True Option3.Value=True Option5.Value=True Text1.FontName=宋体宋体 Text
4、1.FontSize=16 Text1.ForeColor=RGB(0,0,255)End Sub主页主页 Private Sub Command1_Click()“确定确定按钮单击事件按钮单击事件 If Option1.Value Then Text1.FontName=宋体宋体 Else Text1.FontName=幼圆幼圆 End If If Option3.Value Then Text1.FontSize=16 Else Text1.FontSize=20 End If If Option5.Value Then Text1.ForeColor=RGB(0,0,255)Else T
5、ext1.ForeColor=RGB(255,0,0)End If End Sub主页主页 10.2 10.2 滚动条滚动条 1.滚动条的用途滚动条的用途 为不能自动支持滚动的应用程序和控件提供滚动功能,也可作为不能自动支持滚动的应用程序和控件提供滚动功能,也可作为数据输入的工具。为数据输入的工具。水平滚动条水平滚动条(HScrollBar)和和垂直滚动条垂直滚动条(VScrollBar)2.常用属性常用属性 (1)Min、Max属性:最小值属性:最小值Min属性的默认值为属性的默认值为0,最大值,最大值Max属性的默认值为属性的默认值为32767。(2)Value属性:表示滚动块在滚动条中的
6、位置值属性:表示滚动块在滚动条中的位置值 移动滚动块时,代表的值随之改变移动滚动块时,代表的值随之改变 (3)SmallChange属性:最小变动值属性:最小变动值 (4)LargeChange属性:最大变动值属性:最大变动值主页主页 3.事件事件 滚动条控件可以识别滚动条控件可以识别10个事件,其中最常用的是个事件,其中最常用的是Scroll和和Change事件事件 (1)Scroll事件:当用鼠标拖动滚动块时,即触发事件:当用鼠标拖动滚动块时,即触发Scroll事件事件 (2)Change事件:当改变事件:当改变Value属性值时,即触发属性值时,即触发Change事件事件 当释放滚动块、
7、单击滚动条内空白处或滚动箭头时,当释放滚动块、单击滚动条内空白处或滚动箭头时,Change事件就会发生。事件就会发生。主页主页例例10.210.2 设计一个调色板应用程序设计一个调色板应用程序 建立三个水平滚动条作为建立三个水平滚动条作为红、绿、蓝红、绿、蓝三种基本颜色的输入三种基本颜色的输入工具,合成的颜色显示在右边的标签中工具,合成的颜色显示在右边的标签中(图图10.3),用其背景颜色,用其背景颜色属性属性BackColor值的改变实现合成颜色的调色值的改变实现合成颜色的调色 Label1.BackColor=RGB(R,G,B)例例10.2其值分别由其值分别由3个滚动条控制个滚动条控制标
8、签标签Label1主页主页 说明:说明:根据调色原理,基本颜色有红、绿、蓝三种,选择这根据调色原理,基本颜色有红、绿、蓝三种,选择这三种颜色的不同比例,可以合成所需要的任意颜色三种颜色的不同比例,可以合成所需要的任意颜色 (1)创建应用程序的用户界面和设置对象属性创建应用程序的用户界面和设置对象属性 三个水平滚动条名称从上至下分别为三个水平滚动条名称从上至下分别为HScroll1、HScroll2、HScroll3 其其Max属性均设置为属性均设置为255,Min属性均设置为属性均设置为0,SmallChange属性设置为属性设置为1,LargeChange属性设置为属性设置为10,Value
9、设置为设置为0。显示合成颜色的标签名为显示合成颜色的标签名为Label1 主页主页 (2)编写程序代码编写程序代码 功能要求:功能要求:通过操作通过操作(单击或拖动单击或拖动)滚动条,直接修改滚动条,直接修改RGB设置,从而得到标签背景所需的颜色设置,从而得到标签背景所需的颜色 Private Sub HScroll1_Change()Label1.BackColor=RGB(HScroll1.Value,_ HScroll2.Value,HScroll3.Value)End Sub Private Sub HScroll2_Change()Label1.BackColor=RGB(HScro
10、ll1.Value,_ HScroll2.Value,HScroll3.Value)End Sub Private Sub HScroll3_Change()Label1.BackColor=RGB(HScroll1.Value,_ HScroll2.Value,HScroll3.Value)End Sub主页主页 4种图形控件:种图形控件:PictureBox控件、控件、Image控件、控件、Shape控件和控件和Line控件;控件;图形方法图形方法 10.3.1 坐标系坐标系 每个对象都定位于存放它的容器内每个对象都定位于存放它的容器内 每个容器都有一个坐标系,它包括坐标原点,每个容器都有
11、一个坐标系,它包括坐标原点,x x坐标轴和坐标轴和y y坐坐标轴,默认的标轴,默认的坐标原点坐标原点(0,0)(0,0)在容器对象的左上角在容器对象的左上角 默认单位为默认单位为TwipTwip(缇缇),还可以使用磅、像素、厘米等单位,还可以使用磅、像素、厘米等单位10.310.3 图形方法和图形控件图形方法和图形控件YXTopHeightLeftWidth主页主页 使用使用Pset(画点画点)、Line(画线画线)、Circle(画圆画圆)等图形方法,可以在窗体和图片等图形方法,可以在窗体和图片框上绘制简单的图形框上绘制简单的图形 1.Pset(画点画点)方法方法 格式:格式:对象名对象名.
12、Pset Step(x,y),颜色颜色 功能:在对象的指定位置功能:在对象的指定位置(x,y)上按选定的颜色画点上按选定的颜色画点 示例:示例:下列语句能在坐标位置下列语句能在坐标位置(500,900)处画一个红点:处画一个红点:Pset(500,900),RGB(255,0,0)2.Line(画线画线)方法方法 格式:格式:对象名对象名.Line(x1,y1)-(x2,y2),颜色颜色 功能:在两个坐标点之间画一条线段。功能:在两个坐标点之间画一条线段。例如,下列语句可在窗体上画一条斜线例如,下列语句可在窗体上画一条斜线 Line(600,600)-(2000,3000)3.Circle(画
13、圆画圆)方法方法 格式:格式:对象名对象名.Circle Step(x,y),半径,半径,颜色,起点,终点,纵横比,颜色,起点,终点,纵横比 功能:功能:在对象上画圆、椭圆或圆弧在对象上画圆、椭圆或圆弧 10.3.210.3.2 图形方法图形方法 主页主页 图片框图片框(PictureBoxPictureBox)和图像框和图像框(Image)(Image)都是用于显示图形。都是用于显示图形。图片框可以作为其他控件的容器。图片框可以作为其他控件的容器。示例示例 Private Sub Form_Load()Show Picture1.Print 在图片框内写字和画圆在图片框内写字和画圆 Pict
14、ure1.Circle(1200,1000),600,RGB(0,0,255)Picture1.PSet(1200,1000),RGB(255,0,0)End Sub10.4.3 10.4.3 图片框图片框(PictureBoxPictureBox)例例10.3a主页主页 10.3.410.3.4 图像框图像框(Image)(Image)图像框图像框(Image)控件的作用与图片框控件的作用与图片框PictureBox控件相似,但控件相似,但它只能用于显示图形,不能作为其他控件的容器。它只能用于显示图形,不能作为其他控件的容器。10.3.510.3.5 ShapeShape形状控件形状控件 V
15、B提供了画图形的基本工具,如提供了画图形的基本工具,如Shape(形状控件形状控件)、Line(线线控件控件)。Shape控件和控件和Line控件只用于表面装饰,不支持任何事件控件只用于表面装饰,不支持任何事件 Shape控件画出矩形、正方形、圆形等图形。控件画出矩形、正方形、圆形等图形。10.3.610.3.6 LineLine直线控件直线控件 Line直线控件可用来在窗体、框架和图片框中绘制简单的线直线控件可用来在窗体、框架和图片框中绘制简单的线段。段。主页主页 窗体和大多数控件都能响应键盘和鼠标事件窗体和大多数控件都能响应键盘和鼠标事件 10.4.1 10.4.1 键盘事件键盘事件 有三
16、种事件处理键盘操作有三种事件处理键盘操作 1.1.KeyPressKeyPress事件事件 2.2.KeyDownKeyDown事件:事件:用户按下键盘上某个键时触发此事件用户按下键盘上某个键时触发此事件 3.3.KeyUpKeyUp事件:事件:用户按下键盘上某个键后释放时触发此事件用户按下键盘上某个键后释放时触发此事件 10.410.4 键盘与鼠标事件键盘与鼠标事件主页主页 虽然从字面理解虽然从字面理解,KeyDown是按下一个键的意思是按下一个键的意思,但但实际上二者的根本区别是实际上二者的根本区别是,系统由系统由KeyDown返回键盘的返回键盘的代码代码,然后由然后由TranslateM
17、essage函数翻译成字符函数翻译成字符,由由KeyPress返回字符值返回字符值.因此在因此在KeyDown中返回的是键盘中返回的是键盘的代码的代码,而而KeyPress返回的是返回的是ASCII字符字符.所以根据你的所以根据你的目的目的,如果只想读取字符如果只想读取字符,用用KeyPress,如果想读各键的如果想读各键的状态状态,用用KeyDown.说说KeyDown是按下是按下,KeyPress是按下并松开是按下并松开,是不对是不对的的.如果你一直按着键呢如果你一直按着键呢?这时不断地产生这时不断地产生KeyDown和和KeyPress.10.410.4 KeyDown与与keypres
18、s区别联系区别联系主页主页 ClickClick、DblClickDblClick、MouseMoveMouseMove、MouseDownMouseDown和和MouseUpMouseUp事件事件 当移动鼠标时发生当移动鼠标时发生MouseMove事件事件 当按下鼠标任意键时发生当按下鼠标任意键时发生MouseDown事件,放开鼠标键时发生事件,放开鼠标键时发生MouseUp事件事件 后三种事件可以区分鼠标的左、右、中键与后三种事件可以区分鼠标的左、右、中键与Shift、Ctrl、Alt键键 Private Sub 对象名对象名_鼠标事件鼠标事件(Button As Integer,Shif
19、t As Integer,X As Single,Y As Single)说明:说明:(1)Button参数参数表示哪个鼠标键被按下或释放。用表示哪个鼠标键被按下或释放。用0,1,2位分别表示位分别表示鼠标的左、右、中键,用鼠标的左、右、中键,用1或或0表示被按下或释放表示被按下或释放 (2)Shift参数参数表示当鼠标键被按下或释放时,表示当鼠标键被按下或释放时,Shift、Ctrl、Alt键的按下或释键的按下或释放状态。用放状态。用0、1、2位表示位表示Shift、Ctrl、Alt键键 (3)X,Y表示鼠标指针的当前坐标位置表示鼠标指针的当前坐标位置 2 1 0 位位 左键左键右键右键中键
20、中键 10.4.210.4.2 鼠标事件鼠标事件MouseMove、MouseDown或或MouseUp主页主页 当单击鼠标左键时把按钮的位置移动到鼠标指针的位置,单当单击鼠标左键时把按钮的位置移动到鼠标指针的位置,单击鼠标右键时把按钮的位置移动到窗体的左上角位置(即坐标原击鼠标右键时把按钮的位置移动到窗体的左上角位置(即坐标原点)。以下程序将点)。以下程序将MouseDownMouseDown事件与事件与MoveMove方法结合起来使用。方法结合起来使用。Private Sub Private Sub Form_MouseDown(ButtonForm_MouseDown(Button As
21、 Integer,_ As Integer,_ Shift As Integer,X As Single,Y As Single)Shift As Integer,X As Single,Y As Single)If Button=1 Then If Button=1 Then 单击鼠标左键时单击鼠标左键时 Command1.Move X,Y Command1.Move X,Y 移动到鼠标指针的位置移动到鼠标指针的位置 ElseElse Command1.Move 0,0 Command1.Move 0,0 移动到窗体的左上角移动到窗体的左上角 End IfEnd If End Sub End
22、 Sub 例例10.410.4 实现命令按钮位置的移动实现命令按钮位置的移动例例10.4主页主页 10.5 10.5 菜单设计菜单设计 应用程序通过菜单为用户提供一组命令应用程序通过菜单为用户提供一组命令 菜单一般分为两种:菜单一般分为两种:下拉式菜单下拉式菜单和和弹出式菜单弹出式菜单 10.5.1 下拉式菜单下拉式菜单 1.下拉式菜单的结构下拉式菜单的结构 下拉式菜单基本结构包括:顶层菜单、菜单项和子菜单下拉式菜单基本结构包括:顶层菜单、菜单项和子菜单子菜单项子菜单项子菜单提示符子菜单提示符访问键访问键快捷键快捷键分隔线分隔线复选标记复选标记菜单项菜单项顶层菜单顶层菜单例例10.4c主页主页
23、 10.5.210.5.2 菜单编辑器菜单编辑器 设计菜单的工具设计菜单的工具菜单编辑器菜单编辑器 菜单编辑器分为上、下两部分,菜单编辑器分为上、下两部分,上半部分上半部分用来用来设置属性设置属性,下下半部分半部分是是菜单显示区菜单显示区,用来显示用户输入的菜单内容。,用来显示用户输入的菜单内容。10.5.3 10.5.3 菜单的菜单的ClickClick事件事件 除分隔线以外的所有菜单元素都能识别除分隔线以外的所有菜单元素都能识别Click事件事件主页主页例例10.8 编一程序,进行两个操作数的算术运算练习编一程序,进行两个操作数的算术运算练习 设计步骤如下:设计步骤如下:(1)创建应用程序
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 卓然 VB 教程 课件 绘图 菜单 10 教案
限制150内