none
vb2008中对控件的“null”值因如何判断 RRS feed

  • 问题

  • 现建立一个Function函数,引入一个控件变量,例如一个textbox控件。

     

    对textbox控件的text属性进行“null”值判断,不是“”值判断,应该怎么写啊!

     

    还请给出具体的例子

     

    我用IsDBNull(textbox1)来判断,好像不对!

    2008年10月31日 3:06

答案

  • text属性不会是null,默认就是String.Empty

    你可以使用

    If String.IsNullOrEmpty(
    textbox1.Text) Then
    判断是否有值。

    如果要判断是否存在
    textbox1,可以用楼上的方法
    2008年10月31日 5:00
    版主

全部回复

  • text不可能为null吧

     

    Code Snippet

    if textbox is nothing then

     

     

    2008年10月31日 3:32
    版主
  • text属性不会是null,默认就是String.Empty

    你可以使用

    If String.IsNullOrEmpty(
    textbox1.Text) Then
    判断是否有值。

    如果要判断是否存在
    textbox1,可以用楼上的方法
    2008年10月31日 5:00
    版主
  • Access中有一个微软的函数你可以借鉴一下。


    Public Function IsNothing(varToTest As Variant) As Integer
    '  Tests for a "logical" nothing based on data type
    '  Empty and Null = Nothing
    '  Number = 0 is Nothing
    '  Zero length string is Nothing
    '  Date/Time is never Nothing

        IsNothing = True

        Select Case VarType(varToTest)
            Case vbEmpty
                Exit Function
            Case vbNull
                Exit Function
            Case vbBoolean
                If varToTest Then IsNothing = False
            Case vbByte, vbInteger, vbLong, vbSingle, vbDouble, vbCurrency
                If varToTest <> 0 Then IsNothing = False
            Case vbDate
                IsNothing = False
            Case vbString
                If (Len(varToTest) <> 0 And varToTest <> " ") Then IsNothing = False
        End Select

    End Function

    2008年11月12日 9:34