一: 利用錯誤捕獲功能判斷
我們提供的服務(wù)有:網(wǎng)站設(shè)計(jì)、成都網(wǎng)站設(shè)計(jì)、微信公眾號開發(fā)、網(wǎng)站優(yōu)化、網(wǎng)站認(rèn)證、南木林ssl等。為上千家企事業(yè)單位解決了網(wǎng)站和推廣的問題。提供周到的售前咨詢和貼心的售后服務(wù),是有科學(xué)管理、有技術(shù)的南木林網(wǎng)站制作公司
Dim ArrayS() As String
Private Sub Command1_Click()
On Error GoTo z
ReDim ArrayS(10)
If UBound(ArrayS) -1 Then
MsgBox "數(shù)組不為空"
End If
Exit Sub
z:
MsgBox "數(shù)組空"
End Sub
二、 Join方法:
Dim ArrayS() As String
Private Sub Command1_Click()
If (CStr(Join(ArrayS, ""))) = "" Then
MsgBox "為空"
Else
MsgBox "不為空"
End If
End Sub
vb.NET有時很怪,不同版本,或者不同機(jī)器,在操作excel時,判斷單元格是否為空時,會出現(xiàn)不同的錯誤提示。
大多數(shù)情況,xlSheet.Cells(1, 1)="" 就可以判斷這個單元是否有內(nèi)容。
但是有時也會有不同的提示??偨Y(jié)不同機(jī)器,不同版本,用下面幾種來試試單元格是否是空白。
xlSheet.Cells(1, 1)=""
xlSheet.Cells(1, 1).value=""
xlSheet.Cells(1, 1).value.tostring=""
如果上面三個代碼都會自動提示錯誤,請用下面終極模式:)
xlSheet.Cells(1, 1).value = Nothing
1、vb6判斷數(shù)據(jù)庫字段為空值的方法是:if isnull(x1) then ...
2、vb6判斷字符串是空串的方法是:if x2="" then ...
3、強(qiáng)調(diào)一下x1在vb6下必須是varint變量,才能裝入數(shù)據(jù)庫的空值NULL。