Foxtable(狐表)用户栏目专家坐堂 → 怎样让“确定”按钮起作用


  共有19778人关注过本帖平板打印复制链接

主题:怎样让“确定”按钮起作用

美女呀,离线,留言给我吧!
yangming
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/6/5 12:38:00 [只看该作者]

选择班级后,按"确定"按钮进行此班级的总分排名?

先将班级列改成字符列
"确定"代码

Dim Filter As String
With e.Form.Controls("banji")
   If .Value IsNot Nothing Then
       Filter = " [班级] = '" & .Value & "'"
    End If
End With
If Filter > "" Then
   Tables("学生各科成绩表").Filter = Filter
End If
Tables("学生各科成绩表").Sort = "班级,总分年级排名"
[此贴子已经被作者于2009-6-5 12:52:22编辑过]

 回到顶部
总数 16 1 2 下一页