学用VB控件编程.docVIP

学用VB控件编程 ○　Xfon 用VB编程就要用到控件,窗体提供了程序的窗口,而VB控件却要完成程序的大部分任务。这些控件,可以显示或编辑文本,显示图片,与数据库交互,或完成其他许多任务。控件,实质上就是窗体对象内的一个对象。它和窗体一样,都是创建界面的基本构造模块。用Visual Basic开发项目,就是要把窗体、控件和程序组合起来,共同完成一组功能。如果把工程项目比做一个产品的话,那么控件就好比是组成这个产品的一个个零件?而将这些零件组成产品的过程,就是开发者为控件编写代码的过程。 一、认识控件 用控件编程,必须先认识控件,启动一个VB新项目,进入VB工作区,找到控件所在的工具箱,如图(1),该图显示的是控件工具箱中的标准控件,如文本框（TextBox）、标签(Label)、按钮（CommandButton）等,为VB安装时缺省配置。在运行时无须额外文件,它们属于内部控件,存在于Visual Basic的.exe文件中。 在实际编程过程中,工具箱的内部控件是远远不够用的,这时我们就需要加入ActiveX控件扩充功能。通过右击工具箱,打开弹出菜单,选择部件(Conponents),弹出部件(Conponents)窗口(图2),找到所需控件,如:Microsoft Common Dialog Control6.0对话框控件,选定控件名前面的框即可加入,新增的控件就会在工具箱中出现(图3)。Conponents窗口包含了当前系统中安装的所有ActiveX控件,这不光包括Windows系统所带来的控件,还包括第三方控件,控件所在文件的扩展名一般均为OCX。第三方控件一般都可以在程序安装时进入系统,如real公司的RealProducer Basic软件,在安装时会把Real Producer ActiveX Control Library控件安装进系统,我们就可以利用该控件来实现电视信号压缩和文件压缩。 双击控件图标在窗体上引入控件,也可点击控件图标,在窗体上按住左键拖动鼠标,画出控件大小引入控件。一个好的程序界面,必须要合理使用和放置控件,要讲究界面的美观、大方,切勿乱放堆砌控件。 二、控件的属性?方法和事件 控件是具有自己属性、方法和事件的对象,我们可以把属性看成是一个对象的性质,方法看成是对象的动作,事件是看成是对象的响应。拿个气球来比喻,气球的颜色、直径等都是气球的属性,气球本身的充气办法和放气办法就属于气球充放气的方法,气球对外部某些事件响应,如刺破它的事件引起放气,放手的事件引起升空,这就是气球的事件。 在VB中,每个控件都有若干个属性,用户可以通过属性窗口来查看。设置这些属性，如设置控件外观（Appearance）、高（Height）和宽（Width）、名称（Name）、背景色（Backcolor）和可视性(Visible)等。每个控件属性不尽相同,需要说明的一点是在属性窗口中显示的属性并不是该控件的所有属性,控件的只读属性没有显示出来。图4为一个CommandButton的属性窗口。有些非内部控件如ImageList?StatusBar控件,还可以通过右击控件,选择属性,打开属性页来设置该控件属性。 也可以在程序中实现属性的更改,如下面程序就是将按钮控件Command1的Caption属性改为I Want to Click和将文本框的Text属性设为I Want to Click。 Command1.caption=″I Want to Click″ Text1.text=″I Want to Click″ 还可以让程序运行时看不见控件。下列代码将使Command1在程序运行时隐藏起来,这样在某些时候就起到一定的作用。 Command1.visible=false 也可以Command1变成灰色,让用户不能使用。 Command1.enable=false 控件的响应即事件的产生方式有多种,如鼠标事件、键盘事件、焦点事件等。对同一类事件具体分又有不同形式,如鼠标事件中的MouseMove事件MouseDown事件和MouseUp事件。将下面代码加入Command1的MouseDown事件中,按下鼠标后,将Command1的Caption属性改为I Want to Click(如图5)。 Private Sub Command1_MouseDown Command1.caption=″I Want to Click″ End sub 我们可以在代码窗口看到每个控件所具有的事件,在代码窗口的上部,有(通用)和(声明)两个下拉框,通用下拉框中包含有当前窗体上的窗体对象和所有控件,声明下拉框中包含该对象的所有事件。如图6就是Command1所具有的事件。 控件的方法可以看成是对象的动作,控件的属性、方法和事件是相关联