十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
vb.NET有时很怪,不同版本,或者不同机器,在操作excel时,判断单元格是否为空时,会出现不同的错误提示。
成都创新互联-专业网站定制、快速模板网站建设、高性价比迪庆州网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式迪庆州网站制作公司更省心,省钱,快速模板网站建设找我们,业务覆盖迪庆州地区。费用合理售后完善,十年实体公司更值得信赖。
大多数情况,xlSheet.Cells(1, 1)="" 就可以判断这个单元是否有内容。
但是有时也会有不同的提示。总结不同机器,不同版本,用下面几种来试试单元格是否是空白。
xlSheet.Cells(1, 1)=""
xlSheet.Cells(1, 1).value=""
xlSheet.Cells(1, 1).value.tostring=""
如果上面三个代码都会自动提示错误,请用下面终极模式:)
xlSheet.Cells(1, 1).value = Nothing
1、vb6判断数据库字段为空值的方法是:if isnull(x1) then ...
2、vb6判断字符串是空串的方法是:if x2="" then ...
3、强调一下x1在vb6下必须是varint变量,才能装入数据库的空值NULL。
if myreader.getstring(2) "" then
else
....
end if
取反 这样可以的 我一直就这样写
一: 利用错误捕获功能判断
Dim ArrayS() As String
Private Sub Command1_Click()
On Error GoTo z
ReDim ArrayS(10)
If UBound(ArrayS) -1 Then
MsgBox "数组不为空"
End If
Exit Sub
z:
MsgBox "数组空"
End Sub
二、 Join方法:
Dim ArrayS() As String
Private Sub Command1_Click()
If (CStr(Join(ArrayS, ""))) = "" Then
MsgBox "为空"
Else
MsgBox "不为空"
End If
End Sub