Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:[讨论] 请大家看看这段代码有什么问题?

1楼
wcs 发表于:2010/3/4 0:04:00
dim i2 as integer = 0
for each dr4 as datarow in datatables("审核表").datarows
 if dr4.isnull("姓名ID") then
  dataTables("审核表").dataRows.Delete(i2)
 end if
 i2 = i2 + 1
next

“审核表”中有一"姓名ID"列,字符型的

我想如果"姓名ID"列为空的行,就删除该行

如此简单的事,就是看不出问题在哪里。

提示出错的图:


图片点击可在新窗口打开查看此主题相关图片如下:未命名.jpg
图片点击可在新窗口打开查看
2楼
czy 发表于:2010/3/4 0:28:00
即使你的代码不出错,效率也是最差的。
参考:

1、DataTables("审核表").DeleteFor("[姓名ID] Is Null")

2、
Dim drs As List(Of DataRow) = DataTables("审核表").Select("[姓名ID] Is Null")
For n As integer = 0 To drs.Count - 1
    drs(n).Delete
Next
3楼
程兴刚 发表于:2010/3/4 1:42:00
图片点击可在新窗口打开查看
运行逻辑错误,因为遍历到最后一行的时候,i2+1行已经不存在了!
[此贴子已经被作者于2010-3-4 1:45:01编辑过]
4楼
ssqq 发表于:2010/3/4 9:33:00

这是可作为控件使用的sharpdevelop的编辑器组件.

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:icsharpcode.texteditor.rar

5楼
hejfen 发表于:2010/3/4 10:37:00

如何使用?

共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 3 queries.