Foxtable(狐表)用户栏目专家坐堂 → [求助]lsy老师在吗?


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

主题:[求助]lsy老师在吗?

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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/3/18 14:02:00 [显示全部帖子]

年龄是数值,其他都是字符,参照Case Else上面的代码,加上年龄的判断,如果是年龄,就不带单引号。


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/3/18 14:10:00 [显示全部帖子]

你的目录树,年龄筛选比较复杂,可以在年龄不是开头的复选组合中,去掉年龄,简单化。

TextChanged

If s.StartsWith("年龄") Then
    e.Form.Controls("筛选模式").Text = "年龄|姓名"
    tv.BuildTree(dt,"年龄|姓名")
ElseIf s.StartsWith("性别") Then
    e.Form.Controls("筛选模式").Text = "性别|姓名"
    tv.BuildTree(dt,"性别|姓名")
Else
    tv.BuildTree(dt,s.Replace("年龄|","").Replace("|年龄","") ,"","序号")
End If

 


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2014/3/19 8:31:00 [显示全部帖子]

楼主没有真正理解代码,改了一个地方,另一个地方就不知道相应的改变。

 

e.Form.Controls("筛选模式").Text = s.Replace("年龄|","").Replace("|年龄","") ‘加一句,才会与目录树的节点对应。
tv.BuildTree(dt,s.Replace("年龄|","").Replace("|年龄","") ,"","序号")


 回到顶部