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時,判斷單元格是否為空時,會出現不同的錯誤提示。
大多數情況,xlSheet.Cells(1, 1)="" 就可以判斷這個單元是否有內容。
但是有時也會有不同的提示??偨Y不同機器,不同版本,用下面幾種來試試單元格是否是空白。
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。
網頁名稱:vb.net篩選空值 vb中如何篩選出字母
分享地址:http://m.newbst.com/article44/dogocee.html
成都網站建設公司_創新互聯,為您提供虛擬主機、企業網站制作、網站設計公司、搜索引擎優化、網站內鏈、響應式網站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯