VB程序设计电子教案-第3章：VB基本程序控件编程

第3章VB根本控件编程命令按钮、标签及文本框选择性控件滚动条与时钟控件图形控件根本控件综合实例本章学习目标

熟练掌握命令按钮、标签框、文本框的常用属性、事件和方法掌握单项选择按钮、复选框的编程方法，尤其是单项选择按钮与框架控件的配合使用正确使用列表框、组合框进行工程的显示、增加和删除，并注意二者的差异掌握使用滚动条、时钟控件编程的技巧与方法正确运用图片框和图像框显示图形文件，并区分这两种控件的差异能合理运用各种VB标准控件进行综合编程VB6.0的控件分类内部控件

也称标准控件，是指初始状态下在VB6.0的工具箱中显示的控件，不可删除；

ActiveX控件

保存在.ocx类型的文件中，使用前需先将其调入工具箱

；可插入对象控件命令按钮命令按钮编程例如演示－显示不同风格的命令按钮的应用程序命令按钮例如.vbp命令按钮相关知识点

如何设置含背景图案的命令按钮如何为命令按钮设置提示信息如何设置命令按钮的快捷方式与单击命令按钮等价的方法焦点、Tab键顺序问题与单击命令按钮等价的方法按Tab键将焦点移到相应按钮上，然后按回车键按命令按钮的快捷键〔Alt+有下划线的字母，如果该命令按钮设置了快捷键的话〕在代码中设置命令按钮的Value属性为真。标签框与文本框

标签框与文本框编程例如演示－文本的选取与显示标签文本框例如.vbp相关知识点标签框的常用属性文本框的常用属性文本框的常用事件文本框的常用方法标签框的常用属性属性功能说明BackStyle设定label控件背景是透明（值0）还是不透明（值1）当窗体有背景时，为使标签透明显示其上，可用此属性。例：在窗体背景图上用标签显示一信息。AutoSize决定是否能自动改变大小（调节水平方向长度）以正好显示全部内容当要在标签控件中显示多行文本时，或文本的长度可变时，就可设置Autosize为TrueWordWrap决定是否能自动调节垂直方向的长度以显示全部内容（欲起作用，Autosize必须为True）当AutoSize和WordWrap都为True时，文本将会自动换行，而不会增加Label控件的大小文本框的常用属性TextpasswordcharMultiLineMaxLengthScrollBarsLockedSelLength，SelText，SelStart文本框的常用事件Change

当文本框中的内容发生变化时

GetFocu

当对象获得焦点时产生该事件

LostFocus

在一个对象失去焦点时产生该事件

除了大多数控件都响应的Click、Dbclick、KeyPress等事件外，文本框的常用事件还包括：如何实现两个文本框的内容同步改变选择性控件复选框(CheckBox)单项选择按钮(OptionButton)列表框(ListBox)组合框(ComboBox)单项选择、复选控件编程例如单项选择、复选控件编程例如演示单项选择、复选控件相关知识点程序功能运行初始界面设置局部字体后的界面实现方法界面设计代码设计代码清单单项选择复选例如.vbp单项选择、复选控件相关知识点复选框、单项选择按钮的常用属性框架的使用思考题：改进单项选择复选编程例如复选框、单项选择按钮的常用属性EnabledValue表示复选框或单项选择按钮的状态：(1)复选框：0－未选中(Unchecked)，1－选中，(Checked)2－灰色不可选(Grayed)；(2)单项选择按钮：False－未选中，True－选中Style设置复选框或单项选择按钮的外观Picture框架的使用框架是一个容器框架控件的常用属性创立框架时的本卷须知改进的单项选择复选编程例如列表框编程例如列表框编程例如.vbp实现方法界面设计代码设计

●与列表框相关的操作●确定命令按钮的可用状态的操作

列表框的ListCount属性列表框的AddItem方法列表框的RemovIteme方法列表框的ListIndex属性参考代码PrivateSubCommand1_Click()List1.AddItemText1.Text'将"文本框"中的内容添加到"列表框"中Text1.Text=""'去除"文本框"Text1.SetFocusLabel3.Caption=List1.ListCount'显示列表框中客户数目EndSub

'添加按钮的事件处理过程：

'删除按钮的事件处理过程：PrivateSubCommand2_Click()DimIndAsInteger‘定义一个整型变量IndInd=List1.ListIndex'获取索引IfInd>=0Then'确保选定列表工程List1.RemoveItemInd'将其从"列表框"中删除Label3.Caption=List1.ListCount'显示数目EndIfCommand2.Enabled=List1.ListIndex<>-1'假设"列表框"中没有工程，那么禁用此按钮。EndSub'单击列表框选中某一客户时使删除有效PrivateSubList1_Click()Command2.Enabled=List1.ListIndex<>-1EndSub'文本框内容改变事件处理过程PrivateSubText1_Change()'Text1文本框中至少有一个字符时，允许"添加"按钮。Command1.Enabled=Text1.Text<>""EndSub'去除按钮的事件处理过程PrivateSubCommand3_Click()List1.Clear'清空"列表框"。Command2.Enabled=False'禁用"删除"按钮。Label3.Caption=List1.ListCount'显示数目。EndSub列表框相关知识点列表框的重要属性列表框控件的重要方法列表框的重要属性MultiSelectTextListListCountListIndexSelectedSortedNewIndexSelCount列表框控件的重要方法AddItem方法

格式：列表框名.AddItem字符串[,位置号]RemoveItem方法

格式：列表框名.RemoveItem位置号

Clear方法

格式：列表框名.Clear

组合框编程例如实现方法

界面设计代码设计

①如何设置组合框的初始数据②如何设置组合框的初始选项值③如何将学生的学号、姓名、班级这些信息一起添加到列表框代码清单组合框相关知识点组合框〔ComboBox〕兼有文本框和列表框的功能，允许用户通过键入文本或选择列表二种方法来进行选择。组合框常用的属性、方法与列表框相类似，如可用Additem添加工程，RemoveItem删除工程等，其相应操作方法也与列表框相同。组合框有三种不同的外观样式，由属性Style设定，具体参见教材。滚动条与时钟控件滚动条编程例如时钟编程例如滚动条分为水平滚动条(HscrollBox)和垂直滚动条(VscrollBox)两种，通常用来帮助观察数据或确定位置，作为速度、数量的指示器来使用，也可作为数据输入的工具。而VB提供的时钟控件也称为定时器〔Timer〕。定时器每隔一定的时间间隔就产生一次Timer事件〔可理解为报时〕，用户可以根据这个特性设置时间间隔控制某些操作或用于计时。滚动条编程例如滚动条编程例如.vbp实现方法界面设计代码设计

●设置文本框的背景色，可用：Text1.BackColor=RGB(R,G,B)

●滚动条的Change事件

代码清单滚动条相关知识点属性／事件功能／激发条件Min属性设置滚动条的最小值Max属性设置滚动条的最大值SmallChange属性单击滚动条两端的箭头时的增值，默认为１LargeChange属性单击滚动条的滚动区域时的增值Value属性滚动条当前的值滚动条常用事件Change事件当滚动条的Value值值发生变化时Scroll事件移动滚动条时（即使未释放鼠标）滚动条的常用属性及事件时钟编程例如运用时钟控件设计功能如下图的移动字幕程序时钟例如.vbp时钟控件相关知识点时钟控件，可以准确地控制时间，使事件定时发生，也可用于显示系统时间。Timer又称为“定时器”，常用于每隔一定时间去执行某操作。时钟控件的主要属性就只有两个：Interval和Enabled。时钟控件的事件只有一个，即Timer事件，当时钟控件设置的时间间隔到后即激发该事件。设计一程序，每隔１秒，就在标签框中显示当前的时间程序运行界面及参考代码PrivateSubTimer1_Timer〔〕Label1.FontSize=48Label1.Caption=Time'将Time函数返回的系统时间显示在标签中EndSub综合实例3-1个人信息输入程序.vbp

实现分析用消息框MsgBox来实现对话框显示滚动条与显示年龄的文本框之间的配合问题程序运行时，用户既可以在文本框〔Text2〕中输入年龄〔此时应即时反映在垂直滚动条的Value上〕，也可直接点击滚动条的上下箭头设置〔此时应将该设置反映在文本框中〕实现步骤参考代码图形控件图片框和图像框直线控件和形状控件VB提供了四个与图形图像有关的控件，它们分别是图片框〔PictureBox〕控件、图像〔Image〕控件、形状〔Shape〕控件和直线〔Line〕控件。图片框和图像框图片框和图像框都具有显示图形图像的功能，可以加载到这两个控件上的图像文件格式有：位图文件〔.bmp〕、图标文件〔.ico〕、JPEG文件、GIF文件等。图片框和图像框的常用属性图片框、图像框的区别图片框和图像框的常用属性属性图片框控件PictureBox图像框控件ImagePicture设置控件中显示的图形（作为背景图形）AutoSize决定图片框是否自动扩展到图片的大小无此属性Stretch无此属性决定图片是否能自动调整以适应图片框的大小(可能会导致图像变形）图片框、图像框的区别图片框控件可以作为其它控件的容器，图像框却不是。图片框可以通过Print方法和绘图语句输出，而图像框那么不能。图像框比图片框占用的内存少，显示速度快。图像框能够延伸图形的大小，以适应控件的大小，图片框那么不能，但图片框能自动调整控件大小以适应图形的大小。直线控件和形状控件

直线控件〔Line〕主要用于修饰窗体和显示直线，可以显示水平线、垂直或对角线等；形状控件〔Shape〕可以显示矩形、正方形、椭圆、圆形矩形或圆角正方形，也常用来修饰窗体以美化用户界面。直线控件和形状控件的属性并不多，比较常用的有Visible、BorderColor〔图形边界颜色或直线颜色〕、BorderWidth〔线宽〕、BorderStyle〔线型，指虚线、点线、点划线等〕等，形状控件还有FillStyle〔填充图案〕、Shape〔图形形状，如矩形、正方形、椭圆等〕。根本控件综合实例一个简单的加减法测试程序简单的加减法测试程序实现分析提前知识点程序中时间的控制如何让系统自动出题如何处理当测试者输入答案后按回车键的情况提前知识点随机函数Rnd(1)，产生0-1之间的随机数输出格式化函数Format取子串函数Mid条件语句IF…Then…的简单使用程序中时间的控制由于测试开始必须等用户单击“开始”命令按钮以后，因此时钟控件的Enabled属性一开始必须置为False，而在命令按钮的Click的事件过程中才将其设为True。如何让系统自动出题系统要能自动出两个整数用Rnd(