InvalidCastException未处理？

Question

Dim CustID As String = txtSrchCustID.Text 
    Dim FirstName As String = txtNewCustFName.Text 
    Dim SecondName As String = txtNewCustSName.Text 

    If CustID And FirstName And SecondName = "" Then 
     MsgBox("Please enter a term to search by") 
    EndIf 

这会返回“从字符串转换”到“长整型”无效。我想知道错误是什么以及如何修复它？我所看到的其他问题主要是与分配不正确类型的变量有关，但我认为这不是问题。它发生在所有变量都为空时。

谢谢！

Answer 1

你想做什么。你想检查的全部是其中有""。那么做到这一点：

If string.isNullOrEmpty(CustID) and _ 
    string.isNullOrEmpty(FirstName) And string.isNullOrEmpty(SecondName) Then 
     MsgBox("Please enter a term to search by") 
    End If 

还是你想检查，如果他们中的一个是""。那么做到这一点：

If string.isNullOrEmpty(CustID) orelse _ 
    string.isNullOrEmpty(FirstName) orelse string.isNullOrEmpty(SecondName) Then 
     MsgBox("Please enter a term to search by") 
    End If