Foxtable(狐表)用户栏目专家坐堂 → [求助]如何返回一列中最后一个不为空的行的位置


  共有2510人关注过本帖树形打印复制链接

主题:[求助]如何返回一列中最后一个不为空的行的位置

帅哥哟,离线,有人找我吗?
zpsun2003
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:130 积分:1250 威望:0 精华:0 注册:2018/4/19 21:34:00
[求助]如何返回一列中最后一个不为空的行的位置  发帖心情 Post By:2019/1/4 18:50:00 [只看该作者]

如何返回一列中最后一个不为空的行的位置。如列名为[参数名称],列类型为字符型


 回到顶部
帅哥哟,离线,有人找我吗?
zpsun2003
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:130 积分:1250 威望:0 精华:0 注册:2018/4/19 21:34:00
  发帖心情 Post By:2019/1/4 18:59:00 [只看该作者]

我之前用的代码是:
Dim gybydccwz As Integer = Tables("设计系数表").FindRow("[高压半油道尺寸_层间最大工作电压] is Null")-1
但存在缺陷,如果这一列没有空的时候就不对了

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3106 积分:20733 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2019/1/4 19:00:00 [只看该作者]

删掉所有空行,定位到最后一行就可以了啊。

 回到顶部
帅哥哟,离线,有人找我吗?
y2287958
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:4649 积分:33901 威望:0 精华:0 注册:2008/8/31 22:44:00
  发帖心情 Post By:2019/1/4 19:22:00 [只看该作者]

以下是引用zpsun2003在2019/1/4 18:59:00的发言:
我之前用的代码是:
Dim gybydccwz As Integer = Tables("设计系数表").FindRow("[高压半油道尺寸_层间最大工作电压] is Null")-1
但存在缺陷,如果这一列没有空的时候就不对了
判断一下就可以了


 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107730 积分:547983 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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)

 回到顶部