
Dim ty91 As String = DataTables("考勤记录").GetComboListString("姓名与年月", Tables("考勤记录").filter) '这句处理筛选后的数据
Dim xjlx As String = DataTables("考勤记录").GetComboListString("薪假类型", "[姓名与年月] = '" & ty91 & "'").Split("|") '加filter 表示只处理筛选后的数据
上面的第二句话,总是产生提示,去掉第二句代码,就不会有提示。请问是哪里的问题呢?谢谢。
老师早上好。5楼的问题:如果只筛选出一个 [姓名与年月] 再执行的话,那么筛选出的字符串是合乎要求的;但是如果筛选出多个 [姓名与年月] 再执行的话,那么筛选出的字符串就是空值。这是为什么呢,要怎样修改代码呢?谢谢。

此主题相关图片如下:图片1.jpg

上面附件代码,其中图片是执行时的 msgbox 提示。比如 “罗文全”这个人,他的很多数据行里面,有的 “薪假类型” 是 “婚假”,有的 “薪假类型” 是空白的,那么按道理,他的 xjlx 结果就是 “|婚假” 这样子的。但是实际执行结果,他的 xjlx 却是空白的。但是,假设我只筛选出 “罗文全”这一个人的数据再执行代码时,那他的 xjlx 结果就是 “|婚假” 这样子的,这个结果是对的。

此主题相关图片如下:图片2.jpg
假设我只筛选出 “罗文全”这一个人的数据再执行代码,那他的 xjlx 结果就是 “|婚假” 这样子的,这个结果是对的。