第二章VB基本概念.ppt

2020 3 22 第2章简单的VB程序设计 2 2VB中的对象及其属性 事件 方法 2 3简单应用程序的建立 2 4窗体和基本控件 2 5VB常用方法 2 6VB工程结构和工程管理 2020 3 22 2 2VB中对象及其属性 事件和方法 一 VB中的对象及其分类二 对象的属性 事件和方法 2020 3 22 一 对象和类的概念 对象是指在现实世界中可以独立存在的 可以被区分的一些实体 也可以是一些概念上的实体 举例说明 书 笔 手机 飞机等 2020 3 22 类是所有具有一定共性的对象的集合 即类是同种对象的抽象 而对象是类的一次实例化结果 举例说明类的涵义 见下图 2020 3 22 例1 举例说明类和对象的关系 鞋 皮鞋绿 皮鞋白 皮鞋黑 一个类 三个对象 2020 3 22 这是一个类不专指特定的事物 汽车 一辆白色小汽车 举例2如下 这是一个对象 因为它是指一辆具体的汽车实体 该对象的属性为白色 小型等 2020 3 22 一 VB中的类 2020 3 22 二 VB中的对象 定义 VB中的对象是指具有特殊属性和行为方法的实体 如 窗体对象 命令按钮等在VB中大多数对象是由系统设计好的 直接供用户使用 2020 3 22 三 VB中的对象类型 VB中的对象多数已由系统设计好 常用的对象如下 1 窗体对象最基本的对象 用于创建程序的界面 在窗体上可放置不同的控件对象 2020 3 22 2 控件对象 工具箱中的各种控件工具图标 实际上就是代表了各个不同对象的类 当在窗体上画一个控件 并设置其属性后 就创建了一个控件对象 VB中最基本的控件对象有标签 文本框等20个 2020 3 22 构成了对象的三要素 属性是指一个对象的特征 性质 事件是指作用在对象上 且能够为对象所识别和响应的一系列动作 如鼠标的单击等 方法是指对象所发出的动作 举例说明 二 对象的属性 事件和方法 2020 3 22 方法 爆炸 事件 针刺 属性 黄色充满氢气 对象 属性 事件和方法的含义 例3 用针刺一只黄色充满氢气的气球 气球发生爆炸 对象 气球 2020 3 22 一 属性1 属性的概念属性是用来描述和反映对象特征的参数 2 属性和属性值的区别及属性的共有性和私有性 举例说明 在属性窗口中进行查看和设置 2020 3 22 3 设置对象属性值的两种方法 1 在设计阶段利用属性窗口直接设置属性2 在程序代码中通过赋值设置属性 语法格式为 对象名称 属性名称 属性值例Form1 Caption 输入 Text1 Left 100 2020 3 22 二 事件及事件过程 1 事件的概念事件是指作用在某对象上 由VB预先设置好的 能够为某对象所识别和响应的一系列动作 举例说明如鼠标的单击 Click 2020 3 22 又例如 每个对象都可识别一系列事件 如 窗体对象可识别单击 Click 双击 Dblclick 等 2020 3 22 2 有关说明 1 鼠标的单击 Click 双击 DblClick 装载 载入 Load 都是VB中常用的事件 2 事件可以由用户触发 也可由系统触发 2020 3 22 3 事件过程的概念 它是用来说明该事件发生后所要做的事情 它是由编程人员来完成的代码设计 当事件发生时 VB就立即寻找相应的程序进行处理 那么 响应一个事件的程序代码就称为对象的事件过程 2020 3 22 Sub对象名 事件名 参数列表 事件过程代码 EndSub 事件过程名 事件过程的形式 说明 事件过程名由对象名 下划线和事件名组成 2020 3 22 举例4 PrivateSub女生 蟑螂爬过去 高声尖叫的程序代码EndSub PrivateSub男生 蟑螂爬过去 高声喊打的程序代码EndSub 2020 3 22 例5举实例说明事件过程及程序代码应写在何处 应用程序窗体 界面 代码窗口 2020 3 22 4 事件过程是指事件发生后 响应一个事件的程序代码 事件一发生 系统就去执行程序代码 如若希望事件a作用在对象甲上时 执行程序代码 则必须在事件过程 中编写程序代码 5 总结 如何确定在事件过程中编写程序代码的位置 对象甲 事件a 2020 3 22 在代码窗口中对事件过程编程的步骤 如若希望事件a作用在对象甲上时执行程序代码 则 1 单击 对象列表框 右边的箭头 选择需进行事件过程编程的对象甲 2 单击 过程列表框 右边的箭头 选择与所选对象甲对应的事件a 3 在所选事件过程代码模板中编写程序代码 如下所示 2020 3 22 对象列表框 事件名列表框 事件过程模板 2020 3 22 本题涉及的控件对象 界面要求如下 1个文本框 用于显示信息 2个命令按钮 2020 3 22 事件过程代码为 确定 命令按钮的单击事件过程PrivateSubCommand1 Click Text1 Text 欢迎学习VisualBasic 给Text1文本框的Text属性赋值EndSub 2020 3 22 退出 命令按钮的单击事件过程PrivateSubCommand2 Click End 程序结束EndSub 窗体的装载事件过程PrivateSubForm Load Text1 Text 第一个VB应用程序 EndSub 2020 3 22 特别提醒易出错的属性 对象的名称属性 1 命名 每个对象都有自己的名字 有了名字才能在程序代码中引用该对象 在属性窗口 名称 设置对象名称 2 命名格式 名字以字母或汉字开头 由字母 汉字 数字串 下划线组成 长度 40个字符 3 系统的默认名 如 Form1 Label1 Command1 2020 3 22 特别提醒关于事件过程名的命名 一 对于控件来说 事件过程名是由对象名 下划线和事件名三部分组成 而对于窗体来说 事件过程名由Form 下划线和事件名组成 二 举例1 某命令按钮的名称属性为cmddisp 标题为command1 则它的click事件过程名为 A cmddisp click B command1 click 举例2 窗体的名称属性为fm 则它的click事件过程名为 A Fm click B Form1 click C Form click 2020 3 22 认识与提高 当在VB的设计环境中建立对象后 若希望某个对象在收到某个事件后能做出预期的反应 此时 只要在该对象的某一特定事件过程中编写相应的程序代码即可 事件过程代码是由一系列语句行组成的 2020 3 22 三 方法 1 方法的概念方法指的是控制对象动作行为的方式 从对象本身的角度 可通俗地理解为对象的动作 2020 3 22 举例6 说明对象的属性 事件和方法三者之间的关系 属性 红色 事件 箭刺 方法 放气 2020 3 22 2 对象方法的调用格式 对象名 方法名 参数列表 例 方法PrintForm1 Print 欢迎同学们学习VB 或Print 欢迎同学们学习VB 注意 省略对象时表示在当前对象 一般指当前窗体PrivateSubForm Click Print 欢迎同学们学习VB EndSub 2020 3 22 在开发应用程序时 对象 属性 事件和方法的作用体现在何处 1 对象 它是面向对象程序设计的核心 体现在界面设计中 2 属性 是用来描述对象的特征的数据 思考与提高 2020 3 22 3 事件 事件是程序代码执行的导火索 即如果用户或系统不触发对象的事件 程序代码就不可能执行 引入 事件驱动 的概念事件驱动是指程序的执行是靠事件的发生引起的 简言之 只有事件的发生 才能引起程序代码的执行 2020 3 22 2 4窗体和基本控件 2 4 1基本属性1 名称 Name 对象名在此设置 是所有对象都具有的属性 在设计时 系统会给出默认名字 如命令按钮command1 用户可修改 对象名称不显示在窗体上 在运行过程中不可再改变 控件是可视化编程的基础 窗体和控件的属性影响他们的外观和性能 2020 3 22 2 标题 Caption 用于设置窗体或控件的标题 少数控件没有此属性 如 命令按钮上的文字 标题 Caption 2020 3 22 Top Left Width Height 3 高度 Height 宽度 Width 距顶部 Top 距左边 Left 属性用于确定控件的位置 单位 twip1twip 1 20点 1 1440英寸 1 567cm 2020 3 22 4 Enabled属性确定是否允许对控件的操作True 允许False 不允许5 Visible属性控件运行时是否可见True 可见False 不可见注意 可见的对象不一定可操作 不可见的对象一定不能操作 举例演示 四个按钮 运行 单击按钮1 按钮2变灰色不可用 单击按钮3 按钮4消失 同时按钮2又能用了 2020 3 22 PrivateSubCommand1 Click Command2 Enabled FalseEndSubPrivateSubCommand3 Click Command4 Visible FalseCommand2 Enabled TrueEndSub 事件代码 2020 3 22 6 Font系列属性用于设置字体 文本的外观 包括字体 字型 字号和下划线等FontName正文字体 字符型 FontSize大小 整型 FontBold是否粗体 逻辑型 FontItalic是否斜体 逻辑型 FontStrikethru是否加删除线FontUnderline是否加下划线说明 若要对窗体中的所有控件设置相同Font属性 可先对窗体设置 2020 3 22 7 ForeColor前景色 显示正文的颜色BackColor背景色8 BackStyle背景风格 如 标签 0 透明显示 看不到背景色1 不透明显示9 BorderStyle边框风格 如 窗体 标签 0 没有边框1 有单边框 2020 3 22 10 Alignment对齐方式0 LeftJustify正文左对齐1 RightJustify右对齐2 Center居中11 AutoSize自动调整尺寸 如标签 True 自动调整False 保持原来大小12 WordWrap文字缩放 当AutoSize为True时才有效 True 垂直方向发生变化 水平方向不变False 水平方向发生变化 垂直方向不变 2020 3 22 14 控件默认属性在VB中 把某个控件的最重要的属性 称为该控件的默认属性或值 举例 运行时 文本框清空 标签清空 单击窗体 文本框内显示 欢迎学习VB 标签显示 输入框 PrivateSubform Click Text1 Text 欢迎学习VB Label1 caption 输入框 EndSubPrivateSubForm Load Text1 Text Label1 caption EndSub 2020 3 22 2 4 2窗体 是VB中最重要的对象 用于创建VB应用程序的用户界面或对话框 一个工程文件中 至少应包括一个窗体 1 属性 1 基本属性 Name Font 2 Caption属性 2020 3 22 3 BorderStyle 边框风格 属性0 None 无边框1 FixedSingle 固定单线边框2 Sizeable 可调双线边框 缺省3 FixedDialog 固定双线边框4 FixedToolWindow 固定工具窗口5 SizeableToolWindow 可变工具窗口 2020 3 22 4 MaxButton和MinButton 作用 是否显示最大化或最小化按钮值为True或False只有BorderStyle属性的值为1或2时起作用 且只能在属性窗口设置 5 Icon属性 设置当窗体最小化时的图标 2020 3 22 6 ControlBox属性 作用 用来设置窗口的控制图标 该属性只适用于窗体 值为True或False 7 Picture属性 作用 用来在窗体工作区显示一个图形在属性窗口设置代码中使用LoadPicture函数Form1 Picture LoadPicture d image1 bmp 2020 3 22 8 WindowState属性 作用 更改窗体的外观0 Normal 窗体为正常状态 有窗口边界1 Minimized 窗体最小化为一个示意图标 为最小化状态 2 Maximized 窗口充满整个屏幕 无边界 为最大化状态 在程序运行时查看效果 2020 3 22 2 常用事件 1 Load事件 窗体被装入时 启动应用程序 系统自动触发的事件 此时系统会自动执行form load事件过程 可在其内进行变量初始化 对窗体 空间的属性进行设置 2020 3 22 2 常用事件 2 Click事件 当在程序运行过程中 单击一个窗体的空白区域 则会产生窗体的单击事件 此时系统自动会调用执行窗体事件过程Form Click 2020 3 22 3 常用方法 Print 2020 3 22 1 定义是用于显示文本或输出信息的控件 注意 不能作为输入信息的界面2 标签属性 Name Caption Alignment Autosize Font Backcolor Forecolor Enabled Borderstyle等 3 标签事件 Click 2 4 3标签 Label 2020 3 22 说明 标签中的标题文字对齐方式1 左对齐 0 left2 右对齐 1 right3 居中对齐 2 center 标签属性 Alignment 2020 3 22 例 用标签显示当前时间要求 两个按钮 一个标签 设置标签前景色为红色和背景色为蓝色及字体 隶书 字号 二号 功能 单击 显示时间 按钮 标签内显示当前时间 单击 退出 按钮 退出界面 PrivateSubCommand1 Click Label1 Caption 现在的时间是 vbCrLf Time vbcrlf表示回车换行符EndSubPrivateSubCommand2 Click EndEndSub 2020 3 22 是一个文本编辑区域 用于处理与文本有关的内容 如输入 输出 编辑 修改文本信息1 属性 1 基本属性 Name Height Font等 无caption属性 2 Text 文本 属性用来获取或设置文本框中的文本内容 2 4 4文本框 TextBox 2020 3 22 在程序运行期间 VB自动将输入信息保存在文本框的Text属性中 清除文本框内容 Text1 Text 举例 编写圆的面积和周长的程序 运行时 清空文本框和标签4和标签五 要求 五个标签一个文本框 两个按钮PrivateSubCommand1 Click DimRAsDouble SAsDouble CAsDoubleR Val Text1 Text S 3 14 R RC 2 3 14 RLabel4 Caption SLabel5 Caption CEndSubPrivateSubCommand2 Click EndEndSub PrivateSubForm Load Text1 Text Label4 Caption Label5 Caption EndSub 2020 3 22 2020 3 22 3 MaxLength 最大长度 属性设置文本框所允许输入的最大字符数 缺省值0 对字符数没有限制 注意 VB中一个汉字的长度 一个西文字符 4 MultiLine 多行 属性是否允许多行显示 默认FalseTrue 允许False 不允许只能在属性中设置 不能在程序中改变 2020 3 22 5 ScrollBars 滚动条 属性为文本框添加滚动条 只有在MultiLine属性为True时有效 0 None 无 1 Horizontal 水平滚动条 2 Vertical 垂直滚动条 3 Both 同时加 说明 若加水平滚动条 自动换行功能无效 只有按Enter键才可换行 2020 3 22 6 PasswordChar 口令 属性将文本的显示内容全部替换为该属性设置的字符 在实际使用中 常与MaxLength结合使用 用于设计密码输入框 如 缺省值为空字符串 可以看到输入内容 7 Locked属性文本框是否可编辑 默认FalseTrue 不能编辑 相当于标签 False 可以 2020 3 22 SelStart SelLength SelText属性在程序运行中 标识用户选中的文本 用于设置插入点和范围 选择文本或清除文本 文本的剪切 复制和粘贴 注意 只能在代码中设置 SelStart 被选取的文本的位置 即第几个字符 第一个字符位置为0SelLength 选中文本长度 即字符个数 SelText 被选取的文本内容 字符串 若给其赋值 可用它替换选中文本 若没选 则将字符串插入到当前光标所在处 2020 3 22 例2 5 在窗体单击事件中 将选中文本框中的所有文本 并用 Thisisanewtext 代替 PrivateSubForm Click Text1 SelStart 0Text1 SelLength Len Text1 Text Text1 SelText Thisisanewtext EndSub 2020 3 22 PrivateSubCommand1 Click Text2 Text Text1 SelText 显示被选取的文本Text3 Text Text1 SelStart 显示被选取的文本起始位置Text4 Text Text1 SelLength 显示被选取的文本的长度EndSubPrivateSubCommand2 Click Text1 SelText Text2 Text 用text2文本框中的字符去替换text1文本框中被选取的文本 EndSub 2020 3 22 2 事件 1 Change 改变 事件当Textbox控件里的文字有所改变时 发生这个事件 2020 3 22 2 4 5命令按钮 最基本最常用的控件对象 选中命令按钮的三种方法 一 属性1 基本属性 Name Height Font 2 Caption 标题 属性 标题 即显示在命令按钮键面上的文字 2020 3 22 3 Style 风格 属性用于设置或返回命令按钮的显示类型和行为 只能在属性窗口设置 0 Standard 缺省 标准Windows风格命令按钮 按钮上不能显示图形 1 Graphical 图形命令按钮 按钮上可以显示图形的样式 与 Picture 属性混用 2020 3 22 4 Picture 图片 属性该属性只有在Style属性设置为1时才有效 它为图形命令按钮装入一幅示意图 bmp ico 5 ToolTipText 工具显示 属性用于设置当鼠标在控件上暂停时显示的提示性文本 一般与Picture属性同时使用 为图形命令按钮加简短文字说明其功能 2020 3 22 6 Default 确认 属性 只有命令按钮支持Default属性 值为True时 按Enter键相当于单击该命令按钮在一个窗体中 只能有一个按钮的Default属性设为True 2020 3 22 7 Cancel 取消 属性值为True时 按Esc键相当于单击该命令按钮在一个窗体中 只能有一个按钮的Cancel属性设为True 2020 3 22 8 Value 检查按钮状态 属性 该属性只能在程序运行期间设置或利用值为True时 用于以程序方式来引发该命令按钮的Click事件 从而转去执行其相应的程序 例 若要在窗体的单击事件程序中调用并执行命令按钮的Click事件过程 可用以下语句实现 Command2 Value True 2020 3 22 二 事件命令按钮的最基本最重要的事件就是Click 鼠标单击 2020 3 22 四 命令按钮的应用举例要求 窗体上放四个按钮 单击按钮1 按钮2标题改为 新标题 单击按钮3 按钮4 隐藏 PrivateSubCommand1 Click Command2 Caption 新标题 EndSubPrivateSubCommand3 Click Command4 Visible FalseEndSub 2020 3 22 形状控件 shape 指定控件的外观 有6种可选 0矩形1正方形2椭圆3圆4圆角矩形5圆角正方形 常用属性 1 shape 2020 3 22 形状控件 shape 2 FillColor属性填充在简单图形内部的颜色注 只有属性FillStyle的值为0时有效 3 FillStyle属性用来定义形状内部的填充图案样式4 BorderColor 边框颜色 属性5 BorderStyle 边框线的线型样式 属性6 BorderWidth 边框线的宽度 属性 2020 3 22 2 4 6图像框 Image 一 属性1 Picture属性可在属性窗口中设置 也可在程序代码中用LoadPicture函数设置 方法是 对象名 Picture LoadPicture 图像文件名 也就是图像的路径例 image1 picture loadpicture d temp abc jpg 如果是清除图像 image1 picture loadpicture 2020 3 22 2 Stretch 可伸缩性 属性True 被装入的图像按Image框的大小做等比缩放 Flase Image框的大小会随着被装入的图像大小做变化 2020 3 22 二 图像框的应用举例要求 窗体上放三个按钮 按钮1标题改为 显示图像 按钮2标题改为 清除图像 按钮3标题改为 退出程序 PrivateSubCommand1 Click Image1 Picture LoadPicture d a jpg EndSubPrivateSubCommand2 Click Image1 Picture LoadPicture EndSubPrivateSubCommand3 Click EndEndSub 2020 3 22 2 4 7列表框 List 列表框能将多个项目列出 供用户从中作出选择 一 属性1 Listcount属性表示了列表框中的表项的总个数2 Listindex属性表示用户在列表框中选择的那一表项的序号 由于列表框中的表项的序号排列从0开始计数 所以第一项的序号为了0 第二项的序号为1 列表框中的最后一项的序号为listcount 1 如果列表框中没有选中任何项 listindex属性的值为了 1 2020 3 22 3 List属性该属性用来返回或设置列表框中的某一列表项的内容 它是一个保存了列表框中所有项的值的数组 由于列表框中的每一列表项都有一个序号 取值为0 listcount 1之间 所以list i 就代表了一个列表项的值 i为其中某一项的序号 2020 3 22 二 方法1 Additem方法用于向列表框中新增数据项 格式 列表框 additem字符串2 clear方法用于清除列表框中的所有列表项 格式 列表框 clear3 RemoveItem方法 用来删除列表框中指定的列表项格式 列表框 RemoveItem索引号 2020 3 22 例 要求 窗体上添加二个文本框 四个按钮 一个列表框 单击 加入列表框 按钮 文本框内的内容添加到列表框 单击 从列表框中删除 按钮 在列表框中选中的列表项删除 单击 清空列表框 按钮 在列表框清空 单击 列表框内项数 按钮 在文本框内显示总项数 PrivateSubCommand1 Click IfText1 Text ThenList1 AddItemText1 TextEndIfEndSubPrivateSubCommand2 Click List1 RemoveItemList1 ListIndexEndSubPrivateSubCommand3 Click List1 ClearEndSubPrivateSubCommand4 Click Text2 Text List1 ListCountEndSub 2020 3 22 2 4 8计时器 Timer 独立于用户 按一定时间间隔周期性自动引发事件 它必须依附在窗体上 设计阶段可见 运行时不可见 一 属性1 Enabled属性属性值设置为true时 计时器工作 当设置为false时 计时器暂停工作 2 Interval属性该属性用于设置两个计时器事件间的时间间隔 以毫秒为单位 如果将interval属性设置为1000 即1秒 则表示每一秒就发生一个计时器事件 如果设置为10000 则表示每10秒发生一个计时器事件 2020 3 22 二 计时器的应用举例要求 窗体上放一个标签 一个计时器 PrivateSubTimer1 Timer Label1 Caption Time 将系统当前时间显示到标签label1中EndSub 2020 3 22 2 5VB常用方法 1 Print方法 对象名 Print 表达式表 作用 在VB中采用print输出数据 它作为对象的方法使用 print方法可用于窗体 也可用于其他对象 说明 1 对象名 可省略2 表达式表 是被输出的内容 可以是数值表达式或字符表达式 如果是数值表达式 则打印出该表达式的值 如果是字符表达式则照原样输出 注 字符表达式都加双引号 而数值表达式不加双引号 2020 3 22 PrivateSubForm Click a 10b 20PrintaPrinta bPrint thisisastring EndSub3 表达式表 可以是一个或多个表达式 当有多个表达式时 各表达式之间可用逗号 分号隔开 如果各表达式之间用逗号分隔 则按标准输出格式显示各数据 如果各表达式之间用分号分隔 则按紧凑格式输出数据 PrivateSubForm Click a 10b 20Print a b的值为 a bPrint a b的值为 输出 结束 EndSub 2020 3 22 4 Print方法具有计算和输出的双重功能 对于数值表达式 它先计算其值 然后再输出 如 printa b 对于字符表达式 直接输出 如 print 圆的面积是 5 当一个print方法后面无任何表达式时 表示输出一个空行PrivateSubForm Click a 10b 20PrintPrinta bPrintPrint 它的和是 PrintPrinta bEndSub 2020 3 22 与print方法有关的标准函数 Tab n 函数 将被输出的内容放在由参数n所指定的位置 列数 处 被输出的内容在书写时要放在tab函数的右面 并用分号分隔 如printtab 20 40该语句表示在第20列处输出值40说明 1 参数n为数值表达式 其值为一整数 它表示下一个输出位置的列号 表示在输出前把光标移到该列 通常最左边的列号为1 如果当前的显示位置已超过n 则自动下移到下一行的这个位置输出 2020 3 22 例如 PrivateSubForm Click Print 学号 Tab 20 姓名 Tab 40 班级 Print9901 Tab 20 赵光 Tab 40 计算机99 2 Print9902 Tab 20 李丰 Tab 40 计算机99 2 EndSubSpc n