As String, _

    ByVal displayfalse As String, ByVal falsevalue As String)

        rnum = rnum

        m_displaytrue = displaytrue

        m_valuetrue = truevalue

        m_displayfalse = displayfalse

        m_valuefalse = falsevalue

        m_type = source.Columns(rnum).DataType

    End Sub

    Public Sub New(ByVal source As DataTable, ByVal rname As String, ByVal displaytrue As String, ByVal truevalue As String, _

    ByVal displayfalse As String, ByVal falsevalue As String)

        rname = rname

        m_displaytrue = displaytrue

        m_valuetrue = truevalue

        m_displayfalse = displayfalse

        m_valuefalse = falsevalue

        m_type = source.Columns(rname).GetType

    End Sub

    Private m_displaytrue As String '显示的真值

    Private m_displayfalse As String '显示的假值

    Private m_valuefalse As String '存储的假值

    Private m_valuetrue As String '存储的真值

&

上一页  [1] [2] [3] [4] [5] [6] [7] [8] 下一页

在google里搜索更多类似BOOLEAN列的DATAGRIDTEXTBOX的改进与重写

	Web www.51ec.org

上一篇信息学院： DropDownList的绑定与显示问题

下一篇信息学院： 在.net中调用存储过程的另一种方法