控件之美

80酷酷网    80kuku.com

  控件编程过程中总会有些重复的东西,如果到处拷贝,既不容易维护,结构也很不清晰,这时候就可以把他们提取出来,根据其共性,架构属于自己的库,因为一直从事asp.net方面的开发,就结合实际情况,用vb.net举个例子。 asp.net方面的开发,就结合实际情况,用vb.net举个例子。

      在做进销存等软件的时候,经常会用到仓库、部门、类别等基础资料,而且这些东西会反复用到,最常使用的是使用DropDownList控件,如果还没有选定,就列出所有的信息,如果打开已有记录,就显示已选定的信息,功能很简单,就举个仓库的例子。

常用的代码如下,因为是个例子,异常处理就省略了:

(new store).GetData 返还的是个DataTable,里面有主键”StoreID”,名称”StoreName”字段

Protected WithEvents DropStore As System.Web.UI.WebControls.DropDownList

‘绑定仓库DropDownList列表

‘如果StoreID=0,则选择内容为“”,否则选定该仓库

Private Sub BindStore(Optional ByVal StoreID As Integer = 0)

        DropStore.DataSource = (New Store).GetData

        dropstore.DataValueField=”StoreID”

        dropstore.DataTextField =”StoreName”

        DropStore.DataBind()

        Dim listitem As ListItem = New ListItem("", "0")

        dropclass.Items.Add(listitem)

        If StoreID=0 Then

              dropstore.SelectedIndex = dropstore.Items.Count – 1

        Else

              dropstore.Items.FindByValue(StoreID).Selected = True            

        End if

End Sub 这段代码放在需要选择、显示仓库的地方,确实能用,但是如果使用仓库的页面很多,这段代码就需要到处拷贝,既不方便,维护也很不方便,想象一下假如以后需要对仓位管理,DropDownList需要按层次显示库存的情况,那时就需要找到所有使用这段代码的部分,进行修改。       重复的代码统一管理,这是现在编程的基本要求,从可重用性出发,如果把这个部分做成一个控件,在界面上拖拖拉拉,简单设几个属性就达到了目的,确实是个不错的想法,想到就要做到,下面我们就把它实现。       新建一个项目,项目名称是JxcControls,类型为类库,添加一个文件,文件类型是自定义控件,名称StoreDropDownList,打开这个文件,我们可以发现编译器已经帮助我们做了很多东西了,不过这些东西的帮助不大,我们还需要做很多工作,把默认内容改为下面:

    

Imports System.ComponentModel

Imports System.Web.UI

‘把WebControl改为DropDownList

<ToolboxData("<{0}:StoreDropDownList runat=server></{0}:StoreDropDownList>")> Public Class StoreDropDownList

    Inherits System.Web.UI.WebControls.DropDownList

    

    Dim _StoreId As String

    

‘只读属性

    <Bindable(True), Category("Appearance"), DefaultValue("")> ReadOnly Property StoreName

分享到
  • 微信分享
  • 新浪微博
  • QQ好友
  • QQ空间
点击: