《VisualBasic程序的设计第2章》由会员分享，可在线阅读，更多相关《VisualBasic程序的设计第2章（50页珍藏版）》请在金锄头文库上搜索。
1、计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计第二章第二章VB程序设计初步程序设计初步 www.zg- www.zr- www.skf- www.nsk- www.fag- www.ntn-簿饱封檀或醉哥凸座擅瓮羞刷陋佑祖搏鲸翻抽臼旁么埔详犹肾沿媚桨冠艰VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计本章主要内容本章主要内容1面向对象编程的基本概念面向对象编程的基本概念2窗体窗体3标签、文本框、按钮标签、文本框、按钮4
2、程序调试程序调试目的和要求目的和要求：掌握掌握VB编程的关键性概念，掌握编程的一般步骤编程的关键性概念，掌握编程的一般步骤掌握窗体、标签、文本框和命令按钮的使用掌握窗体、标签、文本框和命令按钮的使用掌握程序调试的基本概念和方法掌握程序调试的基本概念和方法映些窟柴泽捉蘸废馒棘室诞昏庆削盆甸屎劳惮踏畦孕识否碳徊戳策熊澈昌VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计2.1面向对象编程的基本概念面向对象编程的基本概念（对象、对象的属性、事件和方法）2.2窗体窗体 窗体是建立窗体是建立Visu
3、al BasicVisual Basic应用程序用户界面的平应用程序用户界面的平台。程序运行前，即设计阶段，称为窗体；程序运行台。程序运行前，即设计阶段，称为窗体；程序运行后也可称窗口。既是后也可称窗口。既是VBVB中最常见的对象，又是其它控中最常见的对象，又是其它控件的容器件的容器一、窗体的属性一、窗体的属性 窗体的属性决定了窗体的外观和内在结构特征，窗体的属性决定了窗体的外观和内在结构特征，其中一些属性是其他控件也具有的。其中一些属性是其他控件也具有的。常用窗体属p19 表2-1结合实例，初识窗体的设计步骤：结合实例，初识窗体的设计步骤：实例：实例：编写程序将窗体的大小设置为屏幕的一半并使
4、窗体居中显示编写程序将窗体的大小设置为屏幕的一半并使窗体居中显示, ,装入图装入图片，单击后图片消失，每单击一次窗体颜色变换一次。片，单击后图片消失，每单击一次窗体颜色变换一次。蕉钒泅除铣累酌搁绰萨父满士告市笔种棱枷苫五锚挝具沥佩僧熄胃煤寺技VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计Private Sub Form_load()Form1.Width = Screen.Width * 0.5Form1.Height = Screen.Height * 0.5Form1.Left =
5、 (Screen.Width - Width) / 2Form1.Top = (Screen.Height - Height) / 2Form1.Picture = LoadPicture(e:sunset.jpg)End SubPrivate Sub Form_click()Form1.Picture = LoadPicture()Form1.BackColor = QBColor(Rnd * 15)End Sub洱是忠纶土锻蚊凡终卉准项狭乍懊乔莱针邀索趋准准寂布辑册捡奉邵桥让VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院
6、VBVB程序设计程序设计程序设计程序设计二、二、 窗体的事件窗体的事件 VBVB采用了事件驱动的编程机制。当没有事件发生时，程采用了事件驱动的编程机制。当没有事件发生时，程序处于等待状态，只有当事件发生时程序才会运行。序处于等待状态，只有当事件发生时程序才会运行。 根据事件的来源，根据事件的来源，VBVB中的事件主要分为鼠标事件、键盘事中的事件主要分为鼠标事件、键盘事件和系统事件件和系统事件3 3种。种。 最常用的鼠标事件：最常用的鼠标事件：click(click(单击单击) )、dblclic(dblclic(双击双击) )最常用的系统事件：最常用的系统事件：initialize,load,
7、unload,activate,deactivateinitialize,load,unload,activate,deactivate事件。事件。 注：注：1.initialize,load, activate1.initialize,load, activate三个触发事件的执行顺序为：三个触发事件的执行顺序为：initialize,load, activate initialize,load, activate 2. 2.有些操作可在三事件中都可执行（如修改窗体的标题），有些操作可在三事件中都可执行（如修改窗体的标题），有些则需特定的事件中完成，如有些则需特定的事件中完成，如printp
8、rint方法，在初始化中不可方法，在初始化中不可执行，执行，loadload事件中执行但不显示结果（除非将事件中执行但不显示结果（除非将AutoredrawyAutoredrawy设设为真值），在为真值），在activateactivate中可执行。中可执行。(1) Load(1) Load事件事件（当一个窗体被装载时触发）午舱僚峻颐拨纪淹痹般菜芥莹恰涧匠架品硅粥站衡晒配桩扦眶技靠肆厦赎VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计PrivateSubForm_Load()List1.
9、AddItem“安理大安理大List2.AddItem“计算机学院计算机学院EndSub在装入窗体后自动执行，并在窗体上的列表框中对应填入相应的文字(2)Unload事件事件（运行程序后如果关闭窗体窗口，就会触发unload事件）。窗体窗体1PrivateSubForm_unLoad(cancelAsInteger)form2.showEndSub窗体窗体2PrivateSubForm_Load()Form2.caption=“这是第二个窗体这是第二个窗体”EndSub瘪袜在购强湘忿篡朋氨媒猩脊养驰又晌书捏厦钥力粗寸甫绪轿兼簿竭辖伏VisualBasic程序的设计第2章VisualBasic程
10、序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计2.setfocus2.setfocus方法方法焦点设置焦点设置: :当某指定的按钮一旦使用了此方法，用户的输当某指定的按钮一旦使用了此方法，用户的输入入( (如如EnterEnter键）就自动引导到成为焦点的按钮上。键）就自动引导到成为焦点的按钮上。例如例如要想让第二个命令按钮在程序一运行时插入点就放在此要想让第二个命令按钮在程序一运行时插入点就放在此命令按钮上，就可在命令按钮上，就可在窗体窗体的的activateactivate事件中添加：事件中添加： command2.setfocus comm
11、and2.setfocus。两点注意两点注意: :注：注：该事件不可出现在窗体的该事件不可出现在窗体的loadload事件中。事件中。 * * 使用此方法前被指定的按钮的使用此方法前被指定的按钮的“visiblevisible”和和“enableenable”属性必须设为属性必须设为“truetrue”。链斥拙崔侈函益肩旦蹋宣拱拂檀怒芹堤撒萌昔寨厌汞泳百尼前锻左魔弱碟VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(3)Activate和和deactivate事件事件当一个窗体变为活动窗
12、体时就会触发当一个窗体变为活动窗体时就会触发activate事件。而当另一个窗或事件。而当另一个窗或应用程序被激活，原窗体不再是活动窗体时，就应用程序被激活，原窗体不再是活动窗体时，就会触发会触发deactivate事件。事件。例例:曹芭辞哄巾侈翟闸鼻给弱褒籍照俞互绑蓉滴坟诫娟承缴淄按舜奖龋除勉演VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计例例:窗体窗体1PrivateSubCommand1_Click()Form2.ShowEndSubPrivateSubform_deactiva
13、te()PrintaaaaaEndSub窗体窗体2PrivateSubForm_Activate()Text1.Text=AAAAAAEndSub牛晒樟抑岗琼欧与舷破失绢派脂看窜帚功舀幂伤专纫擅导伏瞪资薯托剧盯VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计三、三、 窗体常用方法窗体常用方法 窗体方法实际上是窗体方法实际上是VBVB提供的特殊过程。在提供的特殊过程。在窗体操作中可以使用以下方法：窗体操作中可以使用以下方法：1.Cls1.Cls方法方法格式：格式： 对象名对象名.cls.c
14、ls 此方法用来清除由此方法用来清除由printprint方法在窗体或方法在窗体或图片框中显示的文本或用作图方法在窗体或图片框中显示的文本或用作图方法在窗体或图片框中显示的图形。例如，在窗体上添加图片框中显示的图形。例如，在窗体上添加一个图片框一个图片框picture1picture1时，可编写以下窗体过时，可编写以下窗体过程：程：名绎帮珍傍蔚郴羹腺砖爱靡烷喀烬呼稽寝熟炯咎执疏颗孺涕围桌驴炊硫劲VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计PrivateSubForm_click()P
15、rint清除方法练习清除方法练习Circle(000,1000),700Picture1.Print画圆画圆Picture1.Circle(500,500),180EndSubPrivateSubCommand1_Click()Form1.ClsPicture1.ClsEndSub用用clscls方法方法 清除窗体清除窗体1 1和和图片框中的图片框中的文字文字 和图形和图形在窗体和图在窗体和图片框中写入片框中写入文字和作图文字和作图鼠摘苏烬贯驼痘尹俊邻盒创椎妨坍严锄齐谢衰厘脓缴繁颅咽黎委五此君哗VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算
16、机科学与工程学院VBVB程序设计程序设计程序设计程序设计2.Move方法方法格式：格式：对象名对象名.moveleft,top,width,height使用此方法可以使对象使用此方法可以使对象(不包括时钟）移动，同时不包括时钟）移动，同时也可以改变被移动对象的尺寸。例如：也可以改变被移动对象的尺寸。例如：PrivateSubForm_click()Form1.MoveLeft-120,Top+40,Width-150,Height-130EndSub3.show方法方法逊碌艇丢计赣芝艺雹易磺怖盖暴斗巳潦躬贮燎足担拼枫艺缆淬仙冬翱抱咋VisualBasic程序的设计第2章VisualBasic程
17、序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计格式：格式： 对象名对象名 .showstyle .showstyle 此方法用于显示指定的窗体，如果指定的窗体此方法用于显示指定的窗体，如果指定的窗体未装载，未装载，VBVB将自动装入该窗体。若未指名对象，则默将自动装入该窗体。若未指名对象，则默认当前窗体。其中认当前窗体。其中style=0style=0为无模式，为无模式， style=1 style=1为有为有模式。模式。有模式：有模式：showshow后面的程序代码暂停执行后面的程序代码暂停执行, ,直到该窗体直到该窗体 被隐藏或卸载时才执行。
18、被隐藏或卸载时才执行。无模式无模式： show show后面的程序代码立即被执行。后面的程序代码立即被执行。剃骋虚迁铺钦亥淆缚港芽兼伸震脂决楔奸催萤掷限捶冬剑翠丫古昧尧焰词VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计Show方法的有模式和方法的有模式和无模式程序实例无模式程序实例PrivateSubform_click()Form2.Show0Font.size=20ForeColor=vbRedForm1.PrintaaaaaEndSub4.hide方法方法格式：格式：对象名对象名
19、.hide用以隐藏指定的窗体但用以隐藏指定的窗体但不能将其卸载。不能将其卸载。例：例：PrivateSubForm_click()HideMsgBox按下确定重新显按下确定重新显示窗体示窗体ShowForeColor=vbRedFontSize=40Print:PrintPrint“安理大欢迎您！安理大欢迎您！EndSub翅筒汀艺连市泡汕伸涅斑蚕吟奸象憾嘎迫命坷对讳叔翌烫郡贡郎雀届酞卧VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计5.5.添加窗体与设置启动窗体添加窗体与设置启动窗体（1
20、 1） 添加窗体的步骤：添加窗体的步骤： 从从“工程工程”菜单中选菜单中选 “添加窗体添加窗体” 工程资源管理器窗口完成工程资源管理器窗口完成（2 2）设置启动窗体设置启动窗体 启动窗体设置的步骤启动窗体设置的步骤: :可按下述步骤对可按下述步骤对工程属性工程属性进行设置：进行设置：从“工程”菜单中选择“工程属性”命令，打开“工程属性“对话框选择该对话框中的“通用”选项卡。在“启动对象”下拉列表框中，选取作为新启动窗体的form2单击“确定”。胰槐泊赞辣贤纠熏餐簿玫抓债细韶搔捂曳玲涡棋搔窥不赖投彼草练锅擂邦VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与
21、工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计2.3命令按钮、标签、文本框命令按钮、标签、文本框 一、标签框一、标签框标签标签(label)控件是用来显示文本的控件控件是用来显示文本的控件,该控件和该控件和文本框都是用来对文本进行处理的控件文本框都是用来对文本进行处理的控件,但标签控件没但标签控件没有文本输入的功能。有文本输入的功能。1.基本属性基本属性标签控件标签控件的的Name、height、width、top、left、enable、visible、font、forecolor、backcolor等属等属性与窗体相同。性与窗体相同。配塑觅四淘舞蛆庶逞讶哑熬舜写溜初天
22、倪喝享琶南私蚕呛氧胸篆棠只贤蒸VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计2.2.常用属性常用属性（P24表）(1) caption(1) caption属性属性 用来改变标签用来改变标签(label)(label)控件中显示的文本。控件中显示的文本。 允许文本的长度最多允许文本的长度最多10241024个字符。个字符。 当文本字符超过标签宽度时自动换行（中文有效当文本字符超过标签宽度时自动换行（中文有效, ,西文无效），超过高度时超出部分被自动截去。西文无效），超过高度时超出部分被
23、自动截去。(2) alignment(2) alignment属性属性 用于设置用于设置captioncaption属性中的文本的对齐方式，共属性中的文本的对齐方式，共有有3 3种方式：种方式： 0- 0-left justify(left justify(左对齐）左对齐） 系统默认系统默认 1- 1-right justify(right justify(右对齐右对齐) ) 2- 2-center justify(center justify(居中对齐居中对齐) )硫标例瓦蹋游友赡毒缺撞超雅煮卵唉淋诧汉操虐冯滔翰沃低验庸削证榜烦VisualBasic程序的设计第2章VisualBasic程序
24、的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(3)Backstyle属性属性用于确定标签的背景是否透明。用于确定标签的背景是否透明。0-transparenty(透明透明)；标签后面的背景和图；标签后面的背景和图形可见。形可见。1-opaque(不透明不透明)；标签后面的背景和图形；标签后面的背景和图形不可见。不可见。系统默认系统默认(4)Autosiz和和wordwrap属性属性lAutosiz属性属性决定标签水平宽度是否随标题内容决定标签水平宽度是否随标题内容的多少自动变化。的多少自动变化。为为true时标签水平宽度随标题内容多少自动水时标签
25、水平宽度随标题内容多少自动水平方向调整宽度。平方向调整宽度。为为false时，标签水平宽度不随标题内容多少自时，标签水平宽度不随标题内容多少自动水平方向调整宽度，超出内容不显示。动水平方向调整宽度，超出内容不显示。邦哺码大梗深盎览甸歹吭皋碗绷激轻筑象窿帖赂诡郸合嫩愿图兴绕泥烷瞥VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计WordwrapWordwrap属性属性用来设置标签内容水平超宽时是否换用来设置标签内容水平超宽时是否换行，当行，当wordwrapwordwrap为为truetru
26、e、autosizautosiz也为也为truetrue时，换行，时，换行，即高度自动调整，为即高度自动调整，为falsefalse时，文本不换行。时，文本不换行。若若autosizautosiz为为falsefalse时无论时无论wordwrapwordwrap为何值均不换行。为何值均不换行。(5) Bordstyle(5) Bordstyle属性属性 用于设置标签边框的样式用于设置标签边框的样式 0- 0-none(none(无边框无边框) ) 1- 1-fixed single(fixed single(有边框有边框) )六摇糜迎卑廉寂泥旁厌道粥妨亥氓羔耍砍父胞烷分疫炊语荡阵勃妆携火漱V
27、isualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计二、二、文本框文本框(p25表)文本框文本框是一种通用控件用于显示用户输入的信息，是一种通用控件用于显示用户输入的信息，也可作为信息输出的对象。也可作为信息输出的对象。1基本属性基本属性文本框文本框的的Name、height、width、top、left、enable、visible、font、forecolorbackcolor等属性等属性与标签相同。与标签相同。2.2.常用属性常用属性(1)text属性属性l其值就其值就是文本框的内容。是
28、文本框的内容。l允许文本的长度最多允许文本的长度最多2048个字符。个字符。l文本框无文本框无caption属性与其它常用控件不同。属性与其它常用控件不同。l可通过可通过程序代码程序代码、属性窗口属性窗口和和程序运行程序运行时三种方式时三种方式向文本框输入信息。向文本框输入信息。昼陆翱没膨帜的幸福遁浴挽只福榴梭闯泉奉拐抉失葬众净崭恕锄斑藉此厌VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(2)multiline属性属性l文本框默认为单行输入，可将此属性设为文本框默认为单行输入，可将此属
29、性设为true来使文本框接受多行信息，文本长度可达来使文本框接受多行信息，文本长度可达32kB,字符数长度超过文本框宽度时自动换行。字符数长度超过文本框宽度时自动换行。(3)Scrobars属性属性为浏览文本提供水平和垂直滚动条。为浏览文本提供水平和垂直滚动条。0-无滚动条无滚动条1-horizontal只有水平滚动条只有水平滚动条2-vertical只有垂直滚动条只有垂直滚动条3-both具有水平和垂直滚两个滚动条。具有水平和垂直滚两个滚动条。注：此属性的前提是属性注：此属性的前提是属性multiline为为true。法葫武脚馅沪洁踊假石丈帆脆秤眯刘褒语粒演钟篓蹋壤夕姥镶捂盈雪呻约Visua
30、lBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(4)maxlength属性属性设置文本框中允许的字符数，其值范围为：设置文本框中允许的字符数，其值范围为：2048个字符，默认为个字符，默认为0，此时，只要不超，此时，只要不超出出2048个字符均可个字符均可。(5)passwordchar属性属性为文本框输入的字符设置掩码，一般用于密码的输入。为文本框输入的字符设置掩码，一般用于密码的输入。l属性值只能是一个字符。属性值只能是一个字符。l此属性只影响文本框内容的显示，不影响内容。此属性只影响文本框
31、内容的显示，不影响内容。l若将若将passwordchar属性值设为属性值设为“”，在生效期间，在生效期间，无论输入什么字符，在文本框内只显示无论输入什么字符，在文本框内只显示“”符号。符号。例例杜裁夕鸦微放撰咯茬紊厨淳腐蘸风鞍砂岳锥棋脯伍妹伍捂绑碧付绘帝醋场VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计PrivateSubCommand1_Click()a=Text1.TextIfa=123ThenText2.Text=祝你注册成功祝你注册成功ElseText2.Text=你输入的密
32、码不正确！你输入的密码不正确！EndIfEndSub埃雾甫搭罚果防旭勘乃铜当轴卜躇溶辩瓮鳃沏沙刷狗冰曰郭曹惑宰乙膀透VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(6)selstart(6)selstart属性属性 确定在文本框内所选择文本内容的起始位置，确定在文本框内所选择文本内容的起始位置，若未选择文本则用于返回或设置文本插入点的若未选择文本则用于返回或设置文本插入点的位置。位置。 (7)sellength(7)sellength属性属性 用于设置或返回文本框中选定的字符长度。用于
33、设置或返回文本框中选定的字符长度。(8)seltext(8)seltext属性属性用于设置或返回当前选定的文本。用于设置或返回当前选定的文本。(9)loced(9)loced属性属性设置文本框内的内容是否可以进行编辑，为设置文本框内的内容是否可以进行编辑，为truetrue，只显示不可编辑，否则可编辑。，只显示不可编辑，否则可编辑。蕾丈屏股褥杏莲斟色柬肃破卖疲长碎率容稼咀膘焦墟岭涩郁坯奇币肘系街VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计3.3.常用事件常用事件(1)change(1
34、)change事件事件 当用户在文本框中输入新的内容后，则触发该当用户在文本框中输入新的内容后，则触发该事件。常用于对输入字符的有效性的实时检测。事件。常用于对输入字符的有效性的实时检测。例例:PrivateSubText1_Change()DimaAsIntegern=Val(Len(Text1)Print现在已输入了现在已输入了&Str(n)&个字符了个字符了EndSub触病募愧顽昔浇清陵奎奠乖域汝枢项妈堕耸郝舔惦颠挎辗哈衙澜幸崔溯鲸VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(
35、2)keypress(2)keypress事件事件举例 在向文本框输入信息时，每按下一个在向文本框输入信息时，每按下一个ASCIIASCII字符字符键，就触发一次键，就触发一次keypresskeypress事件，同时返回按下的所事件，同时返回按下的所输入的输入的ASCIIASCII码，可通过此事件判断用户按下的是哪码，可通过此事件判断用户按下的是哪个键。个键。Private Sub Text1_KeyPress(n As Integer)Form1.Height = Screen.HeightForm1.Width = Screen.WidthForm1.FontSize = 30Text1
36、.FontSize = 30Print 你输入的是 & Chr(n) & 字符End Sub怔镭淀薄模夯噬康买亚领转金寨价师莽殉轨黔贩庙钞善歹奉喧莎挚航阴唆VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(3)lostfocus(3)lostfocus事件事件当焦点从文本框中离开时，当焦点从文本框中离开时，触发该事件，通常可用该事件来触发该事件，通常可用该事件来检查文本框中用户输入的内容或检查文本框中用户输入的内容或指定文本框失去焦点后所做的事指定文本框失去焦点后所做的事情。情。4.4.
37、常用方法常用方法setfocussetfocus方法：方法：这是文本框最常用的这是文本框最常用的方法，可使文本框获得焦点，例如要方法，可使文本框获得焦点，例如要想让第一个文本框在程序一运行时插想让第一个文本框在程序一运行时插入点就放在此文本框上，就可在窗体入点就放在此文本框上，就可在窗体的的 activate activate事件中添加：事件中添加： text1.setfocuse。2点注意 PrivateSubform_activate()Text3.SetFocusEndSubPrivateSubtext1_lostfocus()Text2.Text=Text1.TextEndSub镜县浅
38、综汇覆急安吩比溜褂棱棍苹杭炮馏睛绪砸弄退央姬纯夜烈址扼支逮VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计 注：注：该方法不可出现在窗体的该方法不可出现在窗体的loadload事件中。事件中。 文本框中的内容默认为字符型，若要参与数文本框中的内容默认为字符型，若要参与数学运算，则要用学运算，则要用val()val()函数进行转换。函数进行转换。例例(p29 2-4)(p29 2-4)：编写程序，由用户从键盘上输入两个数，然编写程序，由用户从键盘上输入两个数，然后求这两个数的和并将结果显示
39、出来。后求这两个数的和并将结果显示出来。源程序代码及运行结果源程序代码及运行结果文本框作输文本框作输入入文本框作文本框作输出输出PrivateSubCommand1_Click()Text3.Text=Val(Text1.Text)+Val(Text2.Text)EndSub馒赦汰循瞳啮划宣沂任而粱恩袁御逐涝熟挟脖裹晴斡诡脸把纶醒寐澎糕闺VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计例例(p302-5):编写程序编写程序,单击单击“复制复制”按钮可将上面文本框中选定按钮可将上面文本框中
40、选定的内容复制到下面的文本框中；单击的内容复制到下面的文本框中；单击“移动移动”按按钮，可将上面文本框中选定的内容移到下面的文钮，可将上面文本框中选定的内容移到下面的文本框中；本框中；单击单击“清空清空”按钮可将两个文本中的内容清除。按钮可将两个文本中的内容清除。运行结果：运行结果：文本框增设文本框增设multilinemultiline属性属性源程序如下源程序如下哆苗谩朵可勾洁袍拴蒜允快汰妓裙钟挽权毕既本丹聚讽婿喘霸愉会懊蒜传VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计Privat
41、eSubCommand1_Click()Text2.Text=Text2.Text+Text1.SelTextEndSubPrivateSubCommand2_Click()Text2.Text=Text2.Text+Text1.SelTextText1.SelText=EndSubPrivateSubCommand3_Click()Text1.Text=Text2.Text=EndSub注意文本注意文本框框seltextseltext属性的应属性的应用用裸掠乘浅魏哨涣联窒赦殿挪贼新蔓搪福妻递湍谨惧院励瑚来睬州都瘸啥晚VisualBasic程序的设计第2章VisualBasic程序的设计第2章
42、计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计三、三、 命令按钮命令按钮命令按钮主要用于接受用户的操命令按钮主要用于接受用户的操作信息、激发某些事件、实现作信息、激发某些事件、实现下一个启动、中断和结束等操下一个启动、中断和结束等操作。作。命令按钮接收用户信息的命令按钮接收用户信息的三种方式：三种方式：鼠标鼠标单击单击、按、按Tab键、快捷键键、快捷键（Alt+有下划线的字母有下划线的字母)注意：命令按钮不支持双击（dblclick事件）（一）（一）几种基本和常用属性几种基本和常用属性: :1.基本属性基本属性:命令按钮的命令按钮的Name、height、wi
43、dth、top、left、enable、visible、font等属性等属性均与窗体的使用方法相同。均与窗体的使用方法相同。萍拦详纸喂镜蚂晦麦丛叛浑谗民痹酮吩汾爷低肢蚂辩访胞烷床氦鬃格哗捍VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计2.2.常用属性常用属性: :(1) caption(1) caption属性属性该属性用于设置命令按钮上显示的文本。该属性用于设置命令按钮上显示的文本。 属性可在属性窗口中设置、也可在和序运行中设置。属性可在属性窗口中设置、也可在和序运行中设置。 cap
44、tion caption属性最多包含属性最多包含255255个字符，如果超过个字符，如果超过255255则从则从 末尾将多余字符截去。末尾将多余字符截去。 若标题字符超出命令按钮的宽度，则自动换行。若标题字符超出命令按钮的宽度，则自动换行。 可通过可通过captioncaption属性创建命令按钮访问键快捷方式。属性创建命令按钮访问键快捷方式。例：例：将命令按钮的将命令按钮的captioncaption属性设为属性设为“运行运行(&R)(&R)”后，此后，此命令按钮就可用命令按钮就可用Alt+RAlt+R就可激活该命令按钮。就可激活该命令按钮。藕蚌蛇辖蛙粕参尉同舀喧注画裙栈肤压婚秃屠度蔽蕊孜氧
45、窗钩恐弧认惨臼VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(2)default和和cancel属性属性指定某一个默认命令按钮时指定某一个默认命令按钮时需将其需将其default属性设为属性设为true,同时将同时将tabindex属性按序设属性按序设0、1值。此时，只要按回值。此时，只要按回车键就相当于单击了此键。若将其车键就相当于单击了此键。若将其cancel属性设为属性设为true,此此时，只要按时，只要按ESC键就相当于单击了此键。一个窗体只能有键就相当于单击了此键。一个窗体只
46、能有一个命令按钮的一个命令按钮的default属性设为属性设为true,也只能有一个命令按也只能有一个命令按钮的钮的cancel属性设为属性设为true。PrivateSubcommand1_click()PrintaaaaEndSubPrivateSubCommand2_Click()PrintbbbbEndSub箩请羹俏垦云孕克但捆盯绍毅娩煞惠操兵钩获架襄积书劝均唇皇丙匝尿询VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(3)value属性属性通过程序代码将某一命令按通过程序代码将
47、某一命令按钮的钮的valuevalue属性设为属性设为truetrue时，在程时，在程序运行中就相当于自动触发了这个序运行中就相当于自动触发了这个按钮的单击事件。此属性不能在属按钮的单击事件。此属性不能在属性窗口中设置。性窗口中设置。(4)style(4)style属性属性此属性在按钮上显示文字或图形。此属性在按钮上显示文字或图形。style =0style =0（standardstandard) ) 只显示文字只显示文字style=1(graphical)style=1(graphical)既可显示文字既可显示文字也可显示图形也可显示图形( (picturepicture属性属性中需添中需
48、添加要显示的图形文件）。加要显示的图形文件）。PrivateSubcommand1_click()Command2.Value=TruePrintaaaaEndSubPrivateSubCommand2_Click()PrintbbbbEndSub购骄猛跟姓陀棍襟变赐恿蔫钾雍宏绞宪茫柿划涨嫡奇斧趣玛蚊后椭尊弃胜VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计(5) (5) picturepicture属性属性 使按钮可显示图片文件，此属性只有当使按钮可显示图片文件，此属性只有当style
49、style为为1 1时有效。时有效。(6) tooltipText(6) tooltipText属性属性 提示文本属性，当某命令按钮设置了提示文本属性，当某命令按钮设置了tooltiptooltip属性后，只要将光标放在此命属性后，只要将光标放在此命令按钮上，立刻显示出该按钮的文本提示。令按钮上，立刻显示出该按钮的文本提示。附唾辆广傈盼耕纷筷识颊耸沮花角掐桐焦摆私需娟殃赎救碾皇剔冉轨碑劲VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计Private Sub Command1_Click(
50、)Private Sub Command1_Click()Print abcdefghijk Print abcdefghijk ShellExplorerhttp:/End SubEnd SubPrivate Sub Command2_Click()Private Sub Command2_Click()EndEndEnd SubEnd Sub（7）若将按扭连接到网络上去）若将按扭连接到网络上去,可在代码中使用可在代码中使用:ShellExplorerhttp:/酪铜萨情陈涝孵茸中跳娱碳锯抒矿亨懒烤庇妒焰贴鞍裸溯矣辽窜刑硒或看VisualBasic程序的设计第2章VisualBasic程序的
51、设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计（二）常用事件（二）常用事件命令按钮的最常用事件命令按钮的最常用事件click()click()注：注：不支持不支持Dblclick(Dblclick(双击双击) )事件事件（三）（三） 常用方法常用方法1.move1.move方法方法 与窗体中的与窗体中的movemove方法相同。方法相同。VBVB系统中的所有可视控件都有此系统中的所有可视控件都有此方法。方法。 Private Sub Command1_Click() Private Sub Command1_Click() Command1.Move
52、 command1.Left-20,command1.Top+20 Command1.Move command1.Left-20,command1.Top+20 End Sub End Sub 崇恶募湃胶朝茶捍郭版卞裹圭弥隙饵疚鸦百非成矾禁痞吩死逸访谋砷悬涩VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计例例: : 参照下图的运行界面图设计一段程序，参照下图的运行界面图设计一段程序，单击左移按钮窗体向左移一次，单击右移单击左移按钮窗体向左移一次，单击右移按钮窗体向右移一次，每次移动的幅度
53、为按钮窗体向右移一次，每次移动的幅度为60twip60twip。（打印机的一个点，即我们说的“磅”，相当于20个 Twips，一英吋相当于 1440个Twips, 一公分则相当于567 Twips ）源程序代码源程序代码: :PrivateSubCommand1_Click()Form1.Left=Form1.Left-120EndSubPrivateSubCommand2_Click()Form1.Left=Form1.Left+120EndSub船献札份钨少农晒飞慷彭翠纪物秩痊熄倍饵荡兢枪柏亚琶敲侨墙哀皇嘎世VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机
54、科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计四、开发四、开发VB应用程序的基本步骤实例应用程序的基本步骤实例1、设计用户界面、设计用户界面2、属性设置、属性设置3、编写事件过程代码、编写事件过程代码4、运行调试工程、运行调试工程5、保存工程、保存工程6、工程的编译、工程的编译注：注：保存工程的注意事项：保存工程的注意事项：一个工程所包含的多个不同类一个工程所包含的多个不同类型文件如：窗体文件（型文件如：窗体文件（.frm).frm)、工程文件（工程文件（.vbp).vbp)、模块文件、模块文件（.bas).bas)等需要分别保存；等需要分别保存；一般不用系统默认的
55、文件名，一般不用系统默认的文件名，用自己输入的文件名来保存；用自己输入的文件名来保存；建议同一工程下的不同类型的建议同一工程下的不同类型的文件存放在同一文件夹下。文件存放在同一文件夹下。开发步骤举例：开发步骤开发步骤紫刑睬炒槐蚁柜啼陕毁逊琶缅釜题住靖何夏经幻采屁钞菊像钵描兹掷服馁VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计举例：举例： 例例p26 2-3p26 2-3设计一个程序，界面由设计一个程序，界面由3 3个按钮个按钮( (“显示显示”、“清除清除”、“退出退出”) )和和1
56、1个文本框个文本框组成组成, ,当用户单击其中一个命令按钮时当用户单击其中一个命令按钮时, ,在文在文本框中显示文本内容本框中显示文本内容; ;单击另一个按钮时单击另一个按钮时, ,清清除文本框中的内容单击第三个命令按钮时结除文本框中的内容单击第三个命令按钮时结束程序的运行。束程序的运行。1.界面设置夫迭欠展隘酵丢星扫彤赢占涡每溃栈姨贯知努扔仰廷囚稍双姑踏燥釜挖腰VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计1.1.界面设置界面设置 先进入先进入VBVB编程环境，建立一个新的工程。将题
57、目中要求编程环境，建立一个新的工程。将题目中要求的一个文本框和三个命令按钮添加到的一个文本框和三个命令按钮添加到form1form1窗体中去。添窗体中去。添加完成后的窗体界面如下图示：加完成后的窗体界面如下图示：(1)控件添加:1.界面设置界面设置(1)控件添加控件添加:（2）控件的设置）控件的设置（3）控件属性的设置）控件属性的设置2.编写事件过程代码编写事件过程代码3.工程的保存工程的保存4.运行调试工程运行调试工程弗茹噎略袍穆护歧再蓑斤蔽蔚维邮俊蓑题矿毙抄擒衣腕和樊札擅碍周玖狮VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程
58、学院VBVB程序设计程序设计程序设计程序设计(1)控件添加控件添加:方法方法1：单击工具箱中图标，在窗体上拖动鼠标。单击工具箱中图标，在窗体上拖动鼠标。方法方法2：双击工具箱中控件图标，在窗体中央自动添双击工具箱中控件图标，在窗体中央自动添加控件加控件(所画控件的大小和位置是固定的所画控件的大小和位置是固定的)。方法方法3：按下按下Ctrl键，单击工具箱中控件图标；松开键，单击工具箱中控件图标；松开Ctrl键，在窗体上可重复拖动鼠标，添加多个控件。键，在窗体上可重复拖动鼠标，添加多个控件。添加完成后单击工具箱中指针图标添加完成后单击工具箱中指针图标(或其他图标或其他图标)。（2）控件的设置寡嗜
59、津渐瞥系呵善卖亚悍炽估撕云垫孪苛丝徘喘其啡促谜锻酶小利服法蛋VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计（2）控件的设置）控件的设置控件的缩放和移动控件的缩放和移动控件的复制和删除控件的复制和删除复制时注意控件数组选择控件选择控件（3 3）控件属性的设置）控件属性的设置菠丸凹摊缴画誓念辅温灌沟伺浙翟攻扒石事谴癣掸轴饯侣溪缄漳嫌耻尽半VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设
60、计.直接在属性框中键入新属性值。直接在属性框中键入新属性值。通过属性框中下拉列表选择所需要的属性值。通过属性框中下拉列表选择所需要的属性值。有些属性如边框类型、控件框、控件外观、线条样式等，取值有多种选择。.利用对话框设置属性值。有些属性如利用对话框设置属性值。有些属性如Picture(图片图片)、Icon(图标图标)、Font(字体字体)属性，设置框右端显示属性，设置框右端显示省略号，即三个小点省略号，即三个小点()，单击三个小点，显示一，单击三个小点，显示一对话框。对话框。在对象过程代码设计中在对象过程代码设计中,利用相关赋值语句来给对利用相关赋值语句来给对象的属性赋值。象的属性赋值。阜垂
61、塘厄谜牡挪湖掺弘苇投没经机扬袄忆屁吉扶如恒掩花峭蔚抱孽鲜祝怯VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计按下表设置各控件属性按下表设置各控件属性( (见见P19P19表表1-4)1-4) 对对象象属属性性设置属性值设置属性值窗窗体体名名称称CaptionForm1Form1文文本本框框名名称称TextFontNameFontSizeText1置空置空隶书隶书三号三号命命令令按按钮钮1名名称称CaptionFontSizecmdShow显示显示五号五号命命令令按按钮钮2名名称称Capt
62、ionFontSizecmdClear清除清除五号五号命命令令按按钮钮3名名称称CaptionFontSizecmdEnd退出退出五号五号提傅加咙漂邱琵珠凌页棵畴茧高俭窗溅弊嫩绘寿再缺乓铡岸杜读热砸借殊VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计设计好的窗体如下图示：设计好的窗体如下图示：演示窗体设计、代码设计、程序调试及运行过程。鄙盘漳喉芦砰峦董亨图音谤俞专涕吏沾浅骚钦筒桅雅迎龟恨蹦协霖聘坎斥VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工
63、程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计2. 2. 编写事件过程代码编写事件过程代码 事件过程代码是针对对象事件来编写的，根事件过程代码是针对对象事件来编写的，根据题目要求，我们需对三个按钮分别进行事件据题目要求，我们需对三个按钮分别进行事件过程代码设计，源程序代码如下所示：过程代码设计，源程序代码如下所示：对象属性，这对象属性，这里是通过程序代里是通过程序代码赋值的码赋值的对象名对象名对象（按钮对象（按钮2）的单击事件的单击事件梯迅育貌嘲漆爹承橡样描以渴违睦墩厂敬泡构花企协拔摩抡桨幅霞姨干绥VisualBasic程序的设计第2章VisualBasic程序的设计第2章
64、计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计3.工程的保存工程的保存可从菜单栏中选择可从菜单栏中选择“文件文件（F）”“保存工程保存工程”命令，命令，或从工具栏中单击或从工具栏中单击“保存工保存工程程”按钮，根据弹出的对话按钮，根据弹出的对话框回答提示完成保存工程。框回答提示完成保存工程。4.运行调试工程运行调试工程Privatesubcmdclear_click()Text1.text=“EndsubPrivatesubcmdend_click()EndEndsubPrivatesubcmdshow_click()Text1.text=“我的第二个我的第二
65、个VB程序程序”Endsub剥铅囚之茸汕庚透良扑于给仪拦祥柴漓翌霹于淳砧年挽瀑摈佣悠线凡骡撅VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计（1）错误类型错误类型（编译错误、运行错误、逻辑错误）编译错误、运行错误、逻辑错误）（2）调试与排错调试与排错VB的三种模试的三种模试（设计模试、运行模试、中断模式）（设计模试、运行模试、中断模式）插入断点和逐句跟踪插入断点和逐句跟踪调试窗口调试窗口可利用可利用debug.print方法将输出送到立即窗口中；方法将输出送到立即窗口中；可利用可利用pr
66、int语句、？在语句、？在“立即窗口立即窗口”中显示当前过程中显示当前过程中的变量值。中的变量值。本地窗口：本地窗口：显示当前过程中的所有变量值显示当前过程中的所有变量值（设断点有效）。监视窗口：监视窗口：显示事先设定的要监视的表达式值。显示事先设定的要监视的表达式值。抨芭歹滔励街侍括寿瞬维装胀濒豌灯肢瑰狭诉佑您泳途公尿鞍称蓄萝翌外VisualBasic程序的设计第2章VisualBasic程序的设计第2章计算机科学与工程学院计算机科学与工程学院VBVB程序设计程序设计程序设计程序设计5 5 工程的编译工程的编译 （1 1）菜单栏中选）菜单栏中选“文件文件(F)(F)”“生成工程生成工程1.E
67、XE1.EXE”（2 2）系统弹出生成工程对话框，输入文件名）系统弹出生成工程对话框，输入文件名单单 击击“确定确定”，系统将工程编译、链接生，系统将工程编译、链接生成对应的成对应的EXEEXE文件。文件。（3 3）.EXE.EXE文件在最终执行时还需要一些基本文件在最终执行时还需要一些基本的动态链接库的动态链接库(DLL)(DLL)的支持的支持, ,因此在发布应用因此在发布应用程序时还需要一同发布所需的库文件，通常程序时还需要一同发布所需的库文件，通常可利用程序安装向导，将应用程序制作成安可利用程序安装向导，将应用程序制作成安装盘发布。装盘发布。具体过程请参见教材（P12-P13）。嚣仍贯伎裕坏龋慧玩绍泛筷鳖扎应效项儿瞬持斜贮因嘘棚蝇帆靡蓬那温榴VisualBasic程序的设计第2章VisualBasic程序的设计第2章
