VB.NET组件叠加具体应用方法详解

开发 后端
VB.NET组件叠加的实现方法可以通过本文给出的几个步骤进行,首先要明确的就是程序运行的环境,只有正确的环境配置才能正确的实现功能。

VB.NET编程语言对于组件的使用是一个比较基础的应用技巧。那么如何才能正确的实现组件的叠加这一功能呢?我们将会在文中给出详细的操作步骤,希望帮助大家方便理解,充分掌握这一应用技巧。#t#

状态栏(StatusBar)也是常见、常用的Windows窗体组件,状态栏的主要作用是显示程序的运行状态或者做一些特定信息提示的载体。Visual Baisc .Net中的StatusBar是.Net FrameWork SDK中的StatusBar类经过实例化产生的。在前面的内容中,通过定义这些组件的相关属性来触发绘制这些组件的相应事件,在这些相关事件中再利用各种绘制方法,实现各种个性化的风格。

StatusBar类虽然没有不供程序员绘制它的任何工具,但其组成面板的StatusBarPanel却提供了Style属性,Style属性是和手工绘制StatusBarPanel相关的一个属性,当Style属性值为OwnerDraw时,就会触发前面内容中经常遇到的DrawItem事件。通过对StatusBarPanel绘制达到绘制StatusBar的目的。具体的实现方法这里就不介绍了,相信诸位结合前面的内容是可以完成的。本文的主要内容探讨扩展StatusBar,使得它能够更直观、更丰富的做好信息提示的工作。主要的做法是在StatusBar上加上各种Windows窗体组件,使得多个组件能够组合成一个组件来使用,从而增加StatusBar的显示方式和内容。

一.本文章中的VB.NET组件叠加程序设计、调试和运行的环境:

(1).微软公司视窗2000服务器版。

(2).Visual Studio .Net 2003企业构建版,.Net FrameWork SDK 1.1版本号4322。

二.从在Form中增加组件说开去:

当在使用Visual Basic .Net开发WinForm程序中,从【工具箱】往窗体中拖入一个组件,这样就在程序窗体中增加了一个组件。也许很多开发者从没有过多的关注过这种简单的操作,其实在此操作背后,系统是做了很多工作的。下面就来详细了解一下系统为实现此步骤所做的工作。我们通过手工编写代码来完成在窗体上增加一个Button组件。为此先完成以下准备步骤:

1. 启动Visual Studio .Net。

2. 选择菜单【文件】|【新建】|【项目】后,弹出【新建项目】对话框。

3. 将【项目类型】设置为【Visual Basic项目】。

4. 将【模板】设置为【Windows应用程序】。

5. 在【名称】文本框中输入【在Form中手工增加组件】。

在【位置】的文本框中输入【E:\VS.NET项目】,然后单击【确定】按钮,这样在“E:\VS.NET项目”目录中就产生了名称为“在Form中手工增加组件”的文件夹,并在里面创建了名称为“在Form中手工增加组件”的项目文件。

6. 把Visual Studio .Net的当前窗口切换到Form1.vb的代码编辑窗口。并在InitializeComponent过程之后添加下列代码,下列代码是定义Form1的Load事件,在此事件中实现手工创建组件、设置组件属性,并把它加到窗体上:

  1. Private Sub Form1_Load ( ByVal sender 
    As Object , ByVal e As System.EventArgs )
     Handles MyBase.Load  
  2. Dim btnTemp As Button = New Button ( )  
  3. '创建Button  
  4. '以下是设定此Button各个属性  
  5. btnTemp.Location = New Point ( 20 , 20 )  
  6. btnTemp.Size = New Size ( 150 , 70 )  
  7. btnTemp.Text = "动态创建的Button" 
  8. Me.Controls.Add ( btnTemp )  
  9. '在Form上加入此Button  
  10. End Sub 


7. 至此手工在Form窗体加入组件的工作就完成了,单击快捷键F5,在程序运行后,窗体中就多了一个Button组件。

可见手工在窗体中增加组件,VB.NET组件叠加一般是三个步骤:首先通过实例化创建一个实例,接着是设定此实例的相关属性,最后通过Control对象的Add方法加入即可。移除加入的组件可以使用Control对象的Remove、RemoveAt或Clear方法。其实在Visual Basic .Net中可以实现多个WinForm组件组合起来使用。一般来说只要组件是容器组件就可以,下面就通过具体示例来介绍其他WinForm组件组合使用的实现方法。

三.在StatusBar上增加ProgressBar:

在很多应用程序都会发现状态栏上有进程条,但是其处理方法一般把这几个组件合并、创建成一个组件,这种方法的确是很好的,但重新创建组件这对很多开发者来说是困难的,有没有更简洁、方便、易操作的实现方法?答案是肯定的。下面方法就是在以上内容的基础上,通过组件的组合完成的。其具体的实现步骤如下:

1. 启动Visual Studio .Net。

2. 选择菜单【文件】|【新建】|【项目】后,弹出【新建项目】对话框。

3. 将【项目类型】设置为【Visual Basic项目】。

4. 将【模板】设置为【Windows应用程序】。

5. 在【名称】文本框中输入【组件的叠加使用】。

6. 在【位置】的文本框中输入【E:\VS.NET项目】,然后单击【确定】按钮,这样在“E:\VS.NET项目”目录中就产生了名称为“组件的叠加使用”的文件夹,并在里面创建了名称为“VB.NET组件叠加”的项目文件。

7. 把Visual Studio .Net的当前窗口切换到【Form1.vb(设计)】窗口,并从【工具箱】中的【Windows窗体组件】选项卡中往Form1窗体中拖入下列组件,并进行相应的操作:

一个Button组件,程序中将通过此组件的Click事件完成在状态栏上加上一个进程条。

一个StatusBar组件,并在这个StatusBar组件上增加二个StatusBarPanel组件。

8. 把Visual Studio .Net的当前窗口切换到Form1.vb的代码编辑窗口,并在InitializeComponent过程之后添加下列代码,下列代码是定义Button1的Click事件,在此事件中将实现创建

  1. ProgressBar实例,并把此实例加到状态栏中,
    具体的实现方法请参阅代码中的注释:  
  2.  
  3. Private Sub Button1_Click ( ByVal 
    sender As System.Object , ByVal e
     As System.EventArgs ) Handles 
    Button1.Click  
  4. Dim psbTemp As ProgressBar = New 
    System.Windows.Forms.ProgressBar ( )  
  5. '创建并初始化一个ProgressBar实例  
  6. psbTemp.Name = "psbTemp" 
  7. psbTemp.TabIndex = 2 
  8. psbTemp.Value = 20 
  9. psbTemp.Width = StatusBar1.Panels ( 0 ).Width  
  10. psbTemp.Height = StatusBar1.Height  
  11. '以状态栏的大小来确定ProgressBar实例大小  
  12. psbTemp.Parent = StatusBar1 
  13. '把状态栏组件设置为进程条组件的父容器  
  14. StatusBar1.Controls.Add ( psbTemp )  
  15. '在状态栏上加入进程条  
  16. StatusBar1.SendToBack ( )  
  17. Button1.Enabled = False 
  18. End Sub 

9. 至此【组件的叠加使用】项目的全部工作就完成了,单击快捷键F5运行程序后,单击Button1按钮后,就得到如图03所示界面:

四.总结:

通过本文可见,VB.NET组件叠加实现起来并不特别困难,首先要了解那些WinForm组件是能够做为容器组件,一般来说只有是容器组件才能够加入其他组件。在创建被加入的实例后,要设定从属关系,并根据实际情况来设定组件的大小和显示区域,最后通过Control对象的Add方法加入即可。诸位可以尝试在其他组件组合起来使用的解决方法,如在一个Button中再加入另外一个Button,具体的实现方法和本文非常相似,不信您试试看。

责任编辑:曹凯 来源: 编程入门网
相关推荐

2010-01-19 16:55:46

VB.NET声明语句

2010-01-21 18:19:45

VB.NET条件编译

2010-01-13 09:45:53

VB.NET Arra

2010-01-21 13:11:31

VB.NET安装工程

2010-01-18 09:55:30

VB.NET删除空白行

2010-01-21 17:48:25

VB.NET Sing

2010-01-21 10:48:18

VB.NET扩展方法

2010-01-07 15:57:02

VB.NET ForEach

2010-01-07 15:25:11

VB.NET数组

2010-01-13 16:45:44

VB.NET删除控件

2010-01-12 11:55:10

VB.NET网络监控

2010-01-07 14:52:41

VB.NET运算符

2010-01-07 16:51:56

VB.NET窗体钩子

2010-01-18 14:35:11

VB.NET读取内存

2011-05-20 16:34:35

VB.NET

2009-11-02 14:35:52

VB.NET打包

2010-01-13 17:23:36

VB.NET动态事件

2010-01-13 17:16:37

VB.NET冒号

2010-01-12 18:40:22

VB.NET Form

2010-01-19 14:50:20

VB.NET集合
点赞
收藏

51CTO技术栈公众号