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 

Это возвращает «Преобразование из строки», чтобы напечатать «Long» недействительно ». Мне было интересно, что такое ошибка и как это можно исправить? Другие вопросы, на которые я смотрел, в основном касались переменных, которые присваивали неправильные типы, но я думаю, что это не проблема. Это происходит, когда все переменные пусты.

Спасибо!

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