If s = Me.NullText Then

            Return DBNull.Value

        ElseIf s = m_displaytrue Then

            Return getchangetype(m_valuetrue)

        ElseIf s = m_displayfalse Then

            Return getchangetype(m_valuefalse)

        Else

            Throw New Exception("输入非法，请检查输入后准备提交的值！")

        End If

    End Function

End Class

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

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

	Web www.51ec.org