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

Question

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

 

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

 

还请给出具体的例子

 

我用IsDBNull（textbox1）来判断，好像不对！

Answer 1

text不可能为null吧

 

Code Snippet

if textbox is nothing then

 

 

Answer 2

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

你可以使用

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

如果要判断是否存在 textbox1，可以用楼上的方法

Answer 3

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