| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- [求助]如何返回一列中最后一个不为空的行的位置 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=129732) |
| -- 作者：zpsun2003 -- 发布时间：2019/1/4 18:50:00 -- [求助]如何返回一列中最后一个不为空的行的位置 如何返回一列中最后一个不为空的行的位置。如列名为[参数名称]，列类型为字符型 |
| -- 作者：zpsun2003 -- 发布时间：2019/1/4 18:59:00 -- 我之前用的代码是： Dim gybydccwz As Integer = Tables("设计系数表").FindRow("[高压半油道尺寸_层间最大工作电压] is Null")-1 但存在缺陷，如果这一列没有空的时候就不对了
|
| -- 作者：cd_tdh -- 发布时间：2019/1/4 19:00:00 -- 删掉所有空行，定位到最后一行就可以了啊。 |
| -- 作者：y2287958 -- 发布时间：2019/1/4 19:22:00 -- 以下是引用zpsun2003在2019/1/4 18:59:00的发言：
我之前用的代码是： Dim gybydccwz As Integer = Tables("设计系数表").FindRow("[高压半油道尺寸_层间最大工作电压] is Null")-1 但存在缺陷，如果这一列没有空的时候就不对了 判断一下就可以了
|
| -- 作者：有点蓝 -- 发布时间：2019/1/4 20:30:00 -- 1、筛选去掉为空的行，然后取最后一行 2、 Dim dr As DataRow = DataTables("设计系数表").Find("[参数名称] is not Null","[_Identify] desc") Dim gybydccwz As Integer = Tables("设计系数表").FindRow(dr)
|