《vb程序设计项目化教程项目制作阴影文字.ppt》由会员分享,可在线阅读,更多相关《vb程序设计项目化教程项目制作阴影文字.ppt(35页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、vb程序程序设计工程化教程工程制作阴工程化教程工程制作阴影文字影文字VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社工程三工程三 制作阴影文字制作阴影文字n工程目标:工程目标:n本工程要制作阴影文字,阴影文字通过三种效果来显本工程要制作阴影文字,阴影文字通过三种效果来显示,即阴影字示,即阴影字“左下偏移,阴影字左下偏移,阴影字“右上偏移,阴右上偏移,阴影字影字“右下偏移,单击相应的按钮实现相应的阴影效右下偏移,单击相应的按钮实现相应的阴影效果。掌握对控件属性的修改两种方法,理解对象、事果。掌握对控件属性的修改两种方法,理解对象、事件和方法的根本概念及使用方法,掌
2、握生成件和方法的根本概念及使用方法,掌握生成exe文件的文件的方法,使得脱离方法,使得脱离VB环境后的程序能继续运行。环境后的程序能继续运行。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社工程三工程三 制作阴影文字制作阴影文字n工程主要知识点:工程主要知识点:n窗体窗体Form的属性设置的属性设置nCaptionnMax ButtonnMin ButtonnBack Colorn标签标签Label的属性设置的属性设置n标题标题Captionn背风光背风光Back Colorn背景样式背景样式Back Stylen字体字体Fontn命令按钮命令按钮Command
3、 Button)的属性的属性n命令按钮的事件命令按钮的事件n控件的移动方法用程序实现控件的移动方法用程序实现n用程序实现修改控件属性的方法用程序实现修改控件属性的方法n控件颜色的使用控件颜色的使用n对象、事件、方法对象、事件、方法n脱离脱离VB环境运行应用程序环境运行应用程序生成生成exe文件文件n程序调试能力培养程序调试能力培养VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社工程三工程三 制作阴影文字制作阴影文字n工程实施步骤:工程实施步骤:n阅读相关根底知识阅读相关根底知识n界面设计界面设计n窗体设计窗体设计n控件属性设置控件属性设置n程序设计程序设计n编程
4、初步编程初步n程序代码程序代码n程序调试,功能完善程序调试,功能完善n程序打包,生成可执行文件程序打包,生成可执行文件EXE VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n3.1.1 对象对象n对象是对象是VB对窗体和控件的统称。如对窗体和控件的统称。如Form窗体、窗体、Label标签、标签、CommandButton按钮等所有控件都是按钮等所有控件都是VB中的中的对象。对象可以用一组数据来描述它本身的特点,而对象。对象可以用一组数据来描述它本身的特点,而且还支持对其施加的操作。描述对象本身特点的称为且还支持对
5、其施加的操作。描述对象本身特点的称为对象的属性,描述对对象施加动作的称为方法。对象的属性,描述对对象施加动作的称为方法。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n3.1.2 属性属性n 描述对象本身特点称为对象的属性,所有的描述对象本身特点称为对象的属性,所有的VB对象对象都有各自的属性集合,对象的属性决定了对象的外观都有各自的属性集合,对象的属性决定了对象的外观和行为。如和行为。如Form窗体的标题,窗体的标题,BackColor,CommandButton按钮上的显示文字的内容和格式等,按钮上的显示文字的
6、内容和格式等,这些都用属性来描述对象。这些都用属性来描述对象。n 设置对象属性的方法有两种:设置对象属性的方法有两种:VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n通过属性窗口通过属性窗口n通过属性窗口的属性列表框设置属性,方通过属性窗口的属性列表框设置属性,方法是:选中对象,然后在属性窗口中找到法是:选中对象,然后在属性窗口中找到相应的属性直接设置,有些属性如:标题相应的属性直接设置,有些属性如:标题Caption、文本、文本Text需要用户修改需要用户修改建立对象时的默认值。有些属性,如图形建立对象时的默认值
7、。有些属性,如图形Picture、图标、图标Icon、字体、字体Font等,在设置框的右边有三个点的省略号等,在设置框的右边有三个点的省略号按钮,单击该按钮将翻开一个对话框供用按钮,单击该按钮将翻开一个对话框供用户进展属性设置,如图户进展属性设置,如图3-1所示。在属性窗所示。在属性窗口的底部有一个简短的提示对属性做简要口的底部有一个简短的提示对属性做简要的介绍。的介绍。图 3-1 属性窗口VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n通过指令代码设置属性通过指令代码设置属性n指令代码修改属性的格式是:指令代码修
8、改属性的格式是:n对象名对象名.属性名称属性名称=属性值属性值n如将命令按钮如将命令按钮Command1的的“标题设置为标题设置为“确定的确定的程序代码是:程序代码是:nCommand1.Caption=确定确定注意:Command1是按钮的Name属性,是编写代码的时候使用的名字,而Caption属性或者Text等属性是显示在界面上给用户看的。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n3.1.3 方法方法n 描述对对象施加动作的称为方法。方法是系统提供的一种特殊的描述对对象施加动作的称为方法。方法是系统提供
9、的一种特殊的函数或过程,用于完成某种特定功能,如去除方法函数或过程,用于完成某种特定功能,如去除方法Cls,显示方法,显示方法Show,移动方法,移动方法Move等。等。n方法决定了对象可以进展的操作,它只能在程序代码中使用。每方法决定了对象可以进展的操作,它只能在程序代码中使用。每个方法完成某种特定的功能,其实现步骤和细节用户看不到,也个方法完成某种特定的功能,其实现步骤和细节用户看不到,也不能修改。用户可以按照约定直接调用他们,其调用格式如下:不能修改。用户可以按照约定直接调用他们,其调用格式如下:n例如:例如:Form2.Show,表示显示,表示显示Form2窗体,窗体,Form1.Hi
10、de表示隐表示隐藏藏Form1,如果,如果Form1是当前窗体,可以使用是当前窗体,可以使用me.Hide来隐藏当来隐藏当前窗体。前窗体。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n3.1.4 事件事件nVB是事件驱动的编程机制。所谓是事件驱动的编程机制。所谓“事件驱动是说只有在事件发生时,程序才能事件驱动是说只有在事件发生时,程序才能执行,在没有事件时,整个程序是不执行的。就像是客观世界的任何对象都会对执行,在没有事件时,整个程序是不执行的。就像是客观世界的任何对象都会对外界的刺激做出反响一样,当用户激发出一
11、个事件后,就会产生一个事件过程,外界的刺激做出反响一样,当用户激发出一个事件后,就会产生一个事件过程,执行一段程序代码,而且同一对象对不同的刺激也会产生不同的反响,当一个对执行一段程序代码,而且同一对象对不同的刺激也会产生不同的反响,当一个对象身上发生不同的事件后,也会引起不同的事件过程。总之,一个对象可以有多象身上发生不同的事件后,也会引起不同的事件过程。总之,一个对象可以有多个事件,各个事件对应不同的代码,实现不同的功能。个事件,各个事件对应不同的代码,实现不同的功能。n“事件是预先定义好的、能够被对象识别的动作。如单击事件是预先定义好的、能够被对象识别的动作。如单击Click事件、双击事
12、件、双击Dbclick事件、装载事件、装载Load事件、鼠标移动事件、鼠标移动MouseMove事件等。不同事件等。不同的对象能够识别不同的事件。当事件发生时,的对象能够识别不同的事件。当事件发生时,VB将检测两条信息:即发生了什么将检测两条信息:即发生了什么事件和哪个对象承受了事件。事件和哪个对象承受了事件。n为了使对象能够对由用户或系统触发的某一事件做出响应,就必须编写事件过程。为了使对象能够对由用户或系统触发的某一事件做出响应,就必须编写事件过程。响应某个事件后所执行的操作可以通过一段程序代码来实现,这段独立的程序代响应某个事件后所执行的操作可以通过一段程序代码来实现,这段独立的程序代码
13、就是码就是“事件过程。事件过程在对象检测到某个特定事件时执行。一个对象可以事件过程。事件过程在对象检测到某个特定事件时执行。一个对象可以识别一个或多个事件,因此可以用一个或多个事件过程对用户的事件做出响应。识别一个或多个事件,因此可以用一个或多个事件过程对用户的事件做出响应。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n事件过程的一般格式是:事件过程的一般格式是:nPrivate Sub 对象名称对象名称_事件名称事件名称n 事件响应程序代码事件响应程序代码nEnd Subn其中,对象名称就是对象的其中,对象名称
14、就是对象的Name属性值,事件名称是由属性值,事件名称是由VB预先预先定义好的赋予该对象的事件,该事件必须是对象所能识别的。如定义好的赋予该对象的事件,该事件必须是对象所能识别的。如单击名为单击名为Command1的命令按钮控件时,退出应用程序的事件过的命令按钮控件时,退出应用程序的事件过程如下:程如下:nPrivate Sub Command1_Click()nUnload MenEnd SubVBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.1 第第1步:根底知识概述步:根底知识概述n3.1.5 可执行文件可执行文件exe文件的生成文件的生成n一个独立的文
15、件是指没有一个独立的文件是指没有VB的环境,直的环境,直接在接在Windows下运行。以前运行下运行。以前运行VB程序程序的时候,通过的时候,通过VB环境对程序边解释遍执环境对程序边解释遍执行,逐行执行,如果想使应用程序不在行,逐行执行,如果想使应用程序不在VB环境中运行,就必须对应用程序进展环境中运行,就必须对应用程序进展编译生成编译生成exe文件,具体做法如下:文件,具体做法如下:n选择菜单【文件】下选择菜单【文件】下“生成生成*.exe,其其中中“*为工程的名字,例如本工程中为工程的名字,例如本工程中工程的名字为工程的名字为“阴影文字,那么【文件阴影文字,那么【文件】菜单中的就会出现】菜
16、单中的就会出现“生成阴影文字生成阴影文字.exe的显示,如图的显示,如图3-2所示,保存位置可以所示,保存位置可以自己选择,文件名也可以更改,更改后自己选择,文件名也可以更改,更改后单击单击“确定,到保存确定,到保存exe文件的位置去文件的位置去查看生成的查看生成的exe文件,双击后即可出现执文件,双击后即可出现执行的界面,和在行的界面,和在VB环境中的执行界面一环境中的执行界面一样。样。图 3-2 生成exe文件VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.2 第第2步:界面设计步:界面设计n翻开工程,双击窗体翻开工程,双击窗体Form1,单击属性窗口,
17、在对象下拉列表框,单击属性窗口,在对象下拉列表框中选择中选择“Form1 Form,设置如下属性:,设置如下属性:n在属性窗口将窗体的在属性窗口将窗体的Caption 属性值设置为属性值设置为“阴影字体阴影字体nBackColor 属性值设置为浅蓝色,方法为:单击属性值设置为浅蓝色,方法为:单击BackColor右右边的下拉按钮,选择边的下拉按钮,选择“调色板,选择第一行第六列的颜色,设调色板,选择第一行第六列的颜色,设置后置后BackColor属性的值为属性的值为“&H00FFFFC0&。n设置设置Form1窗体的窗体的MaxButton属性值为:属性值为:False,让窗体右上角,让窗体右
18、上角没有最大化按钮,只有最小化和关闭按钮没有最大化按钮,只有最小化和关闭按钮 。注意:BackColor是背风光,用来设置控件的背景颜色,命令按钮除外。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.2 第第2步:界面设计步:界面设计 在窗体上添加两个标签在窗体上添加两个标签Label1和和Label2,将其,将其Auto Size属性改为属性改为True,使得,使得Label1和和Label2标签可以根标签可以根据所要显示的内容来自动调整控件的大小,据所要显示的内容来自动调整控件的大小,Back Style属性改为属性改为0,即设置,即设置Label1和和
19、Label2标签的背景标签的背景样式为透明。标签的样式为透明。标签的BackStyle属性用来设置背景样式,属性用来设置背景样式,0Transparent 表示透明,表示透明,1Opaque 表示不表示不透明;在使用的时候可用数字,也可以用英文单词。透明;在使用的时候可用数字,也可以用英文单词。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.2 第第2步:界面设计步:界面设计n添加三个命令按钮添加三个命令按钮Command1Command3,布局排列如图,布局排列如图3-3所示,所示,将将Commad1,Command2和和Command3的的Caption
20、属性值分别设置属性值分别设置为为“左下阴影左下阴影、“右上阴影右上阴影、“右下阴影。右下阴影。n界面设计的效果如图界面设计的效果如图33所示:所示:图3-3 界面设计图VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n编程思路:阴影字的实现是通过文字的位置和颜色调编程思路:阴影字的实现是通过文字的位置和颜色调整来实现文字的阴影效果,对两个同样内容的文字,整来实现文字的阴影效果,对两个同样内容的文字,分别设置不同的颜色,位置稍稍有一些差异,就能显分别设置不同的颜色,位置稍稍有一些差异,就能显示出阴影的效果,通常情况下,我们把阴
21、影的颜色设示出阴影的效果,通常情况下,我们把阴影的颜色设置为黑色,前面字体的颜色随意设置,让两者的位置置为黑色,前面字体的颜色随意设置,让两者的位置保持一定的差异,即可实现不同角度的阴影效果。保持一定的差异,即可实现不同角度的阴影效果。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n程序初始化代码程序初始化代码n在窗体载入的时候,需要先设置两个标签的位于同样的位置,这样看起在窗体载入的时候,需要先设置两个标签的位于同样的位置,这样看起来是重叠的效果,看不出阴影,另外我们通过代码设置来是重叠的效果,看不出阴影,另外我们通过代
22、码设置Label1和和Label2标签的字体大小为标签的字体大小为30,粗体,标签的标题为,粗体,标签的标题为“欢送你的到来,欢送你的到来,设置阴影标签的字体颜色为黑色,设置前面标签显示的字体颜色为黄色。设置阴影标签的字体颜色为黑色,设置前面标签显示的字体颜色为黄色。n在窗体上右键,选择快捷菜单中在窗体上右键,选择快捷菜单中“查看代码,进入代码编辑窗口,在查看代码,进入代码编辑窗口,在对象下拉框中选择对象下拉框中选择“Form,在事件下拉框中选择,在事件下拉框中选择“Load事件,事件,系统自动生成了事件的构造,在两行代码中间是用户写代码的位置,系统自动生成了事件的构造,在两行代码中间是用户写
23、代码的位置,在此补充上实现程序初始化的代码,单引号后的文字是注释。在此补充上实现程序初始化的代码,单引号后的文字是注释。单引号的注释只能注释一行,如果注释换行,需要再用单引号。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码nPrivate Sub Form_Load()窗体装入时执行的程序代码窗体装入时执行的程序代码n Label1.FontSize=30n Label2.FontSize=30 设置文字和阴影的字体大小均为设置文字和阴影的字体大小均为30号号nLabel1.FontBold=Truen Label2.Fo
24、ntBold=True 设置文字和阴影的字体均为粗体设置文字和阴影的字体均为粗体n Label1.Caption=欢送你的到来!欢送你的到来!n Label2.Caption=欢送你的到来!欢送你的到来!设置文字和阴影的内容一致设置文字和阴影的内容一致n Label1.Top=Label2.Top 设置文字和阴影的位置一致,程序启动时设置文字和阴影的位置一致,程序启动时n文字和阴影重合文字和阴影重合n Label1.ForeColor=vbBlack 设置阴影为黑色设置阴影为黑色n Label2.ForeColor=vbYellow 设置文字为黄色设置文字为黄色nEnd SubVBVB程序设计
25、项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n程序执行结果如图程序执行结果如图34:图3-4 程序初始界面执行结果图 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n提示:提示:n颜色设置的方法有三种:颜色设置的方法有三种:n1vb+颜色名称,如颜色名称,如vbBlue代表蓝色代表蓝色n2QBColor数字代码,如数字代码,如QBColor1代表蓝色,参数意义见表代表蓝色,参数意义见表31值值颜色颜色值值颜色颜色0黑色8灰色1兰色9亮兰色2绿色10亮绿色3青色11亮
26、青色4红色12亮红色5洋红色13亮洋红色6黄色14亮黄色7白色15亮白色表表31 Color 参数参数VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n3采用十六进制表示法采用十六进制表示法n 例:例:Label2.ForeColor=&H80000012&黑色黑色n2.控件的字体样式函数有以下几种:控件的字体样式函数有以下几种:nFontBold 加粗加粗nFontItalic 倾斜倾斜nFontUnderline 下划线下划线nFontStrikethru删除线删除线n例:例:Label2.FontBold=True 设
27、置标签字体加粗设置标签字体加粗VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n3、控件的位置有、控件的位置有Left 和和Top两个属性来决定,类似于两个属性来决定,类似于数学坐标系中的横坐标和纵坐标。数学坐标系中的横坐标和纵坐标。Left代表对象的内部代表对象的内部左边线距离容器左边缘的距离。左边线距离容器左边缘的距离。Top 代表对象的顶端代表对象的顶端距离容器顶端的距离。距离容器顶端的距离。Form窗体是个容器,里面可以窗体是个容器,里面可以放置很多控件,在此设置的放置很多控件,在此设置的Top和和Left的值,均指
28、的是的值,均指的是距离距离Form窗体的距离。窗体的距离。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n“左下阴影按钮的程序代码左下阴影按钮的程序代码n编程思路:在运行程序时,当单击按钮编程思路:在运行程序时,当单击按钮“左下阴影时,期望的结果是左下阴影时,期望的结果是“欢送你的到来出欢送你的到来出现阴影效果,黑色阴影出现在原文字的左下方,效果如图现阴影效果,黑色阴影出现在原文字的左下方,效果如图3-4,仔细观察阴影和文字的相对,仔细观察阴影和文字的相对位置。用代码实现时,需要调整阴影文字相对原黄色文字的位置,让黑色的阴
29、影出现在原文位置。用代码实现时,需要调整阴影文字相对原黄色文字的位置,让黑色的阴影出现在原文字的左下方,对象的位置通过字的左下方,对象的位置通过top和和left属性值来决定,所以通过调整属性值来决定,所以通过调整Label1的的top和和left属性属性值即可实现位置的调整,要以值即可实现位置的调整,要以Label2的位置参数作为参照。的位置参数作为参照。n黑色阴影文字位置相对原黄色文字左移,即黑色字体所在的黑色阴影文字位置相对原黄色文字左移,即黑色字体所在的Label1要在原来黄色字体要在原来黄色字体Label2的根底上位置左移,通过的根底上位置左移,通过Label11距离距离Form1窗
30、体左部的距离相对窗体左部的距离相对Label2的距离变小的距离变小来实现,代码为:来实现,代码为:n提示:位置减少提示:位置减少50个单位时阴影效果比较明显且逼真,读者可以修改相对距离,但如果相对个单位时阴影效果比较明显且逼真,读者可以修改相对距离,但如果相对距离过大,阴影和原文字就别离了,无法实现阴影的效果,如果太小,阴影效果也不太明显,距离过大,阴影和原文字就别离了,无法实现阴影的效果,如果太小,阴影效果也不太明显,读者可以自己试验。读者可以自己试验。n阴影位置下移,即黑色字体所在的阴影位置下移,即黑色字体所在的Label1要在原来黄色字体要在原来黄色字体Label2的根底上下移,通过的根
31、底上下移,通过Label11距离距离Form1窗体上部的距离相对窗体上部的距离相对Label2的距离变大来实现,代码为:的距离变大来实现,代码为:nLabel1.Top=Label2.Top+50n思路明确后进入代码编写界面。思路明确后进入代码编写界面。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n双击双击“左下阴影按钮进入代码编写窗口,系统自动生成了左下阴影按钮进入代码编写窗口,系统自动生成了Command1按钮的单击按钮的单击Click事件的构造,单击事件的构造,单击Click事件是事件是CommandButton按
32、钮最常用的事件,当双击对象按钮最常用的事件,当双击对象Command1进进入代码编写窗口时,系统默认生成单击事件的代码构造,补充代入代码编写窗口时,系统默认生成单击事件的代码构造,补充代码和注释最终如下代码所示。码和注释最终如下代码所示。nPrivate Sub Command1_Click()左下阴影按钮的左下阴影按钮的Name属性是属性是Command1 n Label1.Left=Label2.Left-50 设置阴影文字向左偏移设置阴影文字向左偏移50n Label1.Top=Label2.Top+50 设置阴影文字向下偏移设置阴影文字向下偏移50n End SubVBVB程序设计项目
33、化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n 代码完成后,单击【运行】菜单下的工具栏中的代码完成后,单击【运行】菜单下的工具栏中的 按钮,即可运按钮,即可运行程序,单击行程序,单击“左下阴影按钮,运行结果如图左下阴影按钮,运行结果如图3-5所示。所示。图3-5 单击“左下阴影按钮的效果 提示:在VB窗体的坐标系中,坐标原点为窗体的左上角,水平向右横坐标递增,垂直向下纵坐标递增;要注意严格区分。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n3、“右上阴影按钮的程序代码
34、右上阴影按钮的程序代码n编程思路:代码编写思想与编程思路:代码编写思想与“左下阴影按钮类似。左下阴影按钮类似。n在运行程序时,当单击按钮在运行程序时,当单击按钮“右上阴影时,期望的结果是右上阴影时,期望的结果是“欢送你的到来出现欢送你的到来出现阴影效果,黑色阴影出现在原文字的右上方,效果如图阴影效果,黑色阴影出现在原文字的右上方,效果如图3-5。用代码实现时,需要。用代码实现时,需要调整阴影文字相对原黄色文字的位置,通过调整调整阴影文字相对原黄色文字的位置,通过调整Label1的的top和和left属性值即可实属性值即可实现,以现,以Label2的位置参数作为参照。的位置参数作为参照。n黑色阴
35、影文字位置相对原黄色文字右移,即黑色字体所在的黑色阴影文字位置相对原黄色文字右移,即黑色字体所在的Label1要在原来黄色要在原来黄色字体字体Label2的根底上位置右移,通过的根底上位置右移,通过Label11距离距离Form1窗体左部的距离相对窗体左部的距离相对Label2的距离变大来实现,代码为:的距离变大来实现,代码为:nLabel1.Left=Label2.Left+50n阴影位置上移,即黑色字体所在的阴影位置上移,即黑色字体所在的Label1要在原来黄色字体要在原来黄色字体Label2的根底上下上的根底上下上移,通过移,通过Label11距离距离Form1窗体上部的距离相对窗体上部
36、的距离相对Label2的距离变小来实现,代的距离变小来实现,代码为:码为:nLabel1.Top=Label2.Top-50n思路明确后进入代码编写界面。思路明确后进入代码编写界面。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n双击双击“右上阴影按钮进入代码编写窗口,系统自动生成了右上阴影按钮进入代码编写窗口,系统自动生成了Command2按钮的单击按钮的单击Click事件事件的构造,补充代码和注释,最终如下代码所示。的构造,补充代码和注释,最终如下代码所示。nPrivate Sub Command2_Click()n
37、Label1.Left=Label2.Left+50 设置阴影文字向右偏移设置阴影文字向右偏移50n Label1.Top=Label2.Top-50 设置阴影文字向上偏移设置阴影文字向上偏移50nEnd Sub执行结果见以下图注意同图36区分图3-6 右上阴影运行结果图VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:程序代码n4、“右下阴影按钮的程序代码右下阴影按钮的程序代码n 编程思路:编程思路:“右下阴影的代码分析方法与右下阴影的代码分析方法与“左下阴影和左下阴影和“右上右上阴影代码思路类似,与阴影代码思路类似,与“右上阴影少
38、有不同。双击右上阴影少有不同。双击“右下阴影右下阴影按钮进入代码设计窗口,补充如下的代码与注释。按钮进入代码设计窗口,补充如下的代码与注释。“右下阴影右下阴影按钮的按钮的name属性值为:属性值为:Command3。nPrivate Sub Command3_Click()n Label1.Left=Label2.Left+50 设置阴影文字向右偏移设置阴影文字向右偏移50n Label1.Top=Label2.Top+50 设置阴影文字向下偏移设置阴影文字向下偏移50nEnd SubVBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.3 第第3步:程序代码步:
39、程序代码n执行结果见图执行结果见图3-7注意同其他图区分效果注意同其他图区分效果 图 3-7 右上阴影执行结果图VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.4 第第4步:程序调试,功能完善步:程序调试,功能完善n待完善功能待完善功能1:实现:实现“左上阴影的效果,包括界面设左上阴影的效果,包括界面设计和代码实现两局部;计和代码实现两局部;n待完善功能待完善功能2:为三个按钮定义三个快捷键,使得用户:为三个按钮定义三个快捷键,使得用户能用键盘方便操作。能用键盘方便操作。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.5
40、第第5步:程序打包,生成可执行文件步:程序打包,生成可执行文件EXE n单击【文件】菜单下的单击【文件】菜单下的“生成阴影文字生成阴影文字.exe,选择适当的位置保存生,选择适当的位置保存生成的成的exe文件,单击文件,单击“确定。确定。n当需要再次翻开的时候,找到当需要再次翻开的时候,找到“阴影文字阴影文字.exe,双击,双击“阴影文字阴影文字.exe,出现如图,出现如图3-8所示的界面,分别单击三个按钮,运行效果与在所示的界面,分别单击三个按钮,运行效果与在VB环境环境中完全一致。中完全一致。图3-8双击“阴影文字.exe的运行界面VBVB程序设计项目化教程程序设计项目化教程中国水利水电出
41、版社中国水利水电出版社3.5 第第5步:程序打包,生成可执行文件步:程序打包,生成可执行文件EXEn工程总结:工程总结:n各种颜色函数的使用,常用的有三种方法:各种颜色函数的使用,常用的有三种方法:n修改控件属性的两种方法:属性窗口和使用程序修改控件属性修改控件属性的两种方法:属性窗口和使用程序修改控件属性n控件的特殊属性:颜色、字体、位置、样式,通过控件的特殊属性:颜色、字体、位置、样式,通过“来进一步来进一步设置设置n脱离脱离VB开发环境来运行程序的方法:生成开发环境来运行程序的方法:生成exe文件文件n事件、方法、属性的概念和用法:事件是为了完成用户要求的功事件、方法、属性的概念和用法:
42、事件是为了完成用户要求的功能,需要用户在其中写代码,方法和属性是基于控件对象的,方能,需要用户在其中写代码,方法和属性是基于控件对象的,方法是系统定义过的特殊的函数或者过程,属性是对象的特征。法是系统定义过的特殊的函数或者过程,属性是对象的特征。n程序的功能完善和功能添加程序的功能完善和功能添加VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.5 第第5步:程序打包,生成可执行文件步:程序打包,生成可执行文件EXEn操作练习:操作练习:n制作如以下图制作如以下图3-9所示所示的小程序,功能是:的小程序,功能是:当单击当单击“变长按钮变长按钮的时候,蓝条向右增的
43、时候,蓝条向右增大大20个单位,当单击个单位,当单击“变短按钮时,蓝变短按钮时,蓝条向左缩短条向左缩短20个单位,个单位,窗体的标题为窗体的标题为“变魔变魔术。术。图3-9 运行界面图 VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.5 第第5步:程序打包,生成可执行文件步:程序打包,生成可执行文件EXEn编程提示:程序中的蓝条是编程提示:程序中的蓝条是Label标签,标签的显示文标签,标签的显示文字去掉后,修改背景颜色为蓝色,单击字去掉后,修改背景颜色为蓝色,单击“变长按钮,变长按钮,要实现蓝条变长只需在要实现蓝条变长只需在“变长按钮的单击事件中修改变长按
44、钮的单击事件中修改Label的宽度在原来根底上增加的宽度在原来根底上增加20即可,单击即可,单击“变短变短按钮的时候,在按钮的时候,在“变短按钮的单击事件中修改变短按钮的单击事件中修改Label1的宽度在原来根底上减少的宽度在原来根底上减少20即可。即可。VBVB程序设计项目化教程程序设计项目化教程中国水利水电出版社中国水利水电出版社3.5 第第5步:程序打包,生成可执行文件步:程序打包,生成可执行文件EXEn复习思考:复习思考:n一、选择题一、选择题n1、颜色设置的方法有、颜色设置的方法有 nA:vb+颜色名称颜色名称nB:QBColor数字代码数字代码nC:采用十六进制表示法:采用十六进制
45、表示法nD:采用二进制表示法:采用二进制表示法n二、填空题二、填空题n1、是是VB对窗体和控件的统称。对窗体和控件的统称。n2、对象可以用一组数据来描述它本身的特点,而且还支持对其施加的操作。描述对象本身特、对象可以用一组数据来描述它本身的特点,而且还支持对其施加的操作。描述对象本身特点的称为对象的点的称为对象的 ,描述对对象施加动作的称为,描述对对象施加动作的称为 。n3、指令代码修改属性的格式是:、指令代码修改属性的格式是:。n4、描述对对象施加动作的称为方、描述对对象施加动作的称为方 法。法。n三、思考题三、思考题n1:自己动手为本工程的命令按钮添加快捷方式,参照:自己动手为本工程的命令按钮添加快捷方式,参照“工程二中快捷键的设置方法;工程二中快捷键的设置方法;n2:如何用属性对话框设置使得两个:如何用属性对话框设置使得两个Label标签实现重合;标签实现重合;n3:如何实现阴影效果?试将程序中的参数数值修改,并观察效果。编程实现:如何实现阴影效果?试将程序中的参数数值修改,并观察效果。编程实现n4:如果要实现:如果要实现“左上阴影的效果,如何来实现?包括界面设计和代码实现两局部。左上阴影的效果,如何来实现?包括界面设计和代码实现两局部。
限制150内