请问vb.net如何判断Excel中的空单元格，就是没有使用的单元格

do while 循环前将n=1，cells(n,1)后加.value

我们提供的服务有：网站建设、成都网站设计、微信公众号开发、网站优化、网站认证、全椒ssl等。为上1000+企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的全椒网站制作公司

Private Sub Command1_Click()

Set objexcel = CreateObject("Excel.application")

Set objworkBook = objexcel.Workbooks.Open("d:\k.xls", 3, False)

Set ExcelSheet = objworkBook.Worksheets(1)

objexcel.Visible = ture

以下三行是想如果单元格不为空就让变量n加1。

n=1'需要指定n的初始值，否则n为空值，下面的语句将错误。

Do While ExcelSheet.cells(n, 1).value  ""       'cells后加value属性

n = n + 1

Loop

ExcelSheet.cells(n, 1).value = Text1.Text      'cells后加value属性

objworkBook.Save

objworkBook.Close

Set objexcel = Nothing

End Sub

vb.net操作excel时,如何判断单元格内容为空

vb.NET有时很怪，不同版本，或者不同机器，在操作excel时，判断单元格是否为空时，会出现不同的错误提示。

大多数情况，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

vb 上如何判断空值

1、vb6判断数据库字段为空值的方法是：if isnull(x1) then ...

2、vb6判断字符串是空串的方法是：if x2="" then ...

3、强调一下x1在vb6下必须是varint变量，才能装入数据库的空值NULL。

分享名称：vb.net筛选空值 vb中如何筛选出字母
标题网址：http://cdweb.net/article/dogocee.html