EXCEL中只有一个SHEET一列两行数据，其中有一行是隐藏的，执行下列代码后感觉循环了很多遍才结束（当cbox2.Checked=false不被选中的情况下），老师帮忙看看是不是哪里有问题？
For i As Integer = 1 To rg.Rows.Count
If CBox2.Checked OrElse rg.Rows(i).height <> 0 Then
'msgbox(1)
For j As Integer = 1 To rg.Columns.Count
'msgbox(2)
If CBox2.Checked OrElse rg.Columns(j).width <> 0 Then
'msgbox(3)
If ary(i,j) <> Nothing Then
'msgbox(4)
If CBox1.Checked = False OrElse CBox1.Checked = True AndAlso System.Text.RegularExpressions.Regex.Match(ary(i,j),"[\u4e00-\u9fa5]+").Tostring()>""
'msgbox(5)
Dim dr As DataRow = DataTables("内容").AddNew
dr("原文") = ary(i, j)
lbl5.text ="提取内容:" & ary(i,j)
End If
End If
End If
Next
End If
Next
加好友 
发短信
Post By：2016/11/11 16:36:00 [只看该作者]
