以前在寫類代碼時候，改寫了一些自定義的類代碼，自己在做CManage時，一些傳統的類老是要重復地寫。有點煩，在參考同學的類代碼中。自己也寫了一些類。以下就是這個作業的類的代碼。

這里是一個類，存儲字段的類
Public?Class?ParmClass?Parm
????Public?str1?As?String
????Public?str2?As?String
????Public?str3?As?String
????Public?str4?As?String
????Public?str5?As?String

????Public?DataKeyField?As?String
????Public?DataTextField?As?String
????Public?DataValueField?As?String
????Public?objCtr?As?Object
End?Class ?'返回sqldatareader(數據讀取器)（用于查找數據）
????Public?Function?ReturnReader()Function?ReturnReader(ByVal?myParm?As?Parm)?As?SqlDataReader
????????Dim?Cmd?As?SqlCommand?=?ReturnCmd(myParm)
????????Dim?MyDtr?As?SqlDataReader?=?Cmd.ExecuteReader(CommandBehavior.CloseConnection)
????????Return?MyDtr
????End?Function
????Public?Function?ReturnCmd()Function?ReturnCmd(ByVal?myParm?As?Parm)?As?SqlCommand
????????con.Open()
????????Dim?Cmd?As?SqlCommand
????????Cmd?=?New?SqlCommand(myParm.str1,?con)
????????Cmd.CommandType?=?CommandType.StoredProcedure
????????Return?Cmd
????End?Function
????'數據控件的數據綁定（通用于Dropdownlist,datagrid,datalist）（數據源是Datareader）
????Public?Sub?DataControlDataReaderBinding()Sub?DataControlDataReaderBinding(ByVal?myp?As?Parm)
????????myp.objCtr.DataSource?=?ReturnReader(myp)
????????If?TypeOf?(myp.objCtr)?Is?DataList?Or?TypeOf?(myp.objCtr)?Is?DataGrid?Then
????????????If?myp.DataKeyField?<>?""?Then
????????????????myp.objCtr.DataKeyField?=?myp.DataKeyField
????????????End?If
????????????myp.objCtr.DataBind()
????????ElseIf?TypeOf?(myp.objCtr)?Is?DropDownList?Then
????????????myp.objCtr.DataTextField?=?myp.DataTextField
????????????myp.objCtr.DataValueField?=?myp.DataValueField
????????????myp.objCtr.DataBind()
????????End?If
????????con.Close()
????End?Sub ??Dim?myTest?As?New?Test
????Private?Sub?ddlBindClass()Sub?ddlBindClass()
????????Dim?myParm?As?New?Parm
????????myParm.str1?=?"sp_SelectNewsClass"
????????myParm.objCtr?=?ddlBindNewsClass
????????myParm.DataTextField?=?"ClassName"
????????myTest.DataControlDataReaderBinding(myParm)
???????????End?Sub

轉載于:https://www.cnblogs.com/zhangchenliang/archive/2006/05/22/406603.html

總結

以上是生活随笔為你收集整理的自己写的一些类代码的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。