vb.NET有時很怪,不同版本,或者不同機器,在操作excel時,判斷單元格是否為空時,會出現(xiàn)不同的錯誤提示。
創(chuàng)新互聯(lián)-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設、高性價比開平網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式開平網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設找我們,業(yè)務覆蓋開平地區(qū)。費用合理售后完善,10年實體公司更值得信賴。
大多數(shù)情況,xlSheet.Cells(1, 1)="" 就可以判斷這個單元是否有內(nèi)容。
但是有時也會有不同的提示??偨Y不同機器,不同版本,用下面幾種來試試單元格是否是空白。
xlSheet.Cells(1, 1)=""
xlSheet.Cells(1, 1).value=""
xlSheet.Cells(1, 1).value.tostring=""
如果上面三個代碼都會自動提示錯誤,請用下面終極模式:)
xlSheet.Cells(1, 1).value = Nothing
如果你是使用ADO控件來連接數(shù)據(jù)庫,那么這樣:
If Adodc1.Recordset.RecordCount = 0 Then MsgBox "這個數(shù)據(jù)表是空的?。?
如果是使用ADODB對象來連接數(shù)據(jù)庫的(像下面那樣):
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Set Conn = New ADODB.Connection
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" App.Path "\tada.mdb;Persist Security Info=False"
Set Rs = New ADODB.Recordset
Rs.Open "Select * from data", Conn, adOpenKeyset, adLockOptimistic
那么這樣:
If Rs.RecordCount = 0 Then MsgBox "這個數(shù)據(jù)表是空的??!"
1、vb6判斷數(shù)據(jù)庫字段為空值的方法是:if isnull(x1) then ...
2、vb6判斷字符串是空串的方法是:if x2="" then ...
3、強調一下x1在vb6下必須是varint變量,才能裝入數(shù)據(jù)庫的空值NULL。