Office中国论坛/Access中国论坛

标题: 数值筛选表达式 str = "[岗位ID]= MM" 怎样写？ [打印本页]

作者: 付谦 时间: 2009-7-5 11:09
标题: 数值筛选表达式 str = "[岗位ID]= MM" 怎样写？
如果把[岗位ID]字段设成字符型下列语句运行正常：
Private Sub Treeview_NodeClick(ByVal Node As Object)
Dim MM As String
Dim str As String
MM = ""
str = ""
MM = Mid((Node.Key), 2, Len(Node.Key) - 1)
'str = "[岗位ID]='" & MM & "'"
Me.Form.FilterOn = True
Me.Form.Filter = str
End Sub

如果把[岗位ID]字段设成数字型下列语句运行不正常：
Private Sub Treeview_NodeClick(ByVal Node As Object)

Dim str As String
MM = 0
str = ""
MM = Mid((Node.Key), 2, Len(Node.Key) - 1)
str = "[岗位ID]= MM"
Me.Form.FilterOn = True
Me.Form.Filter = str
End Sub

作者: koutx 时间: 2009-7-5 19:39
本帖最后由 koutx 于 2009-7-5 19:41 编辑

MM = Mid((Node.Key), 2, Len(Node.Key) - 1)
Me.Filter = "[岗位ID] = " & CInt(MM)
Me.FilterOn = True

作者: 付谦 时间: 2009-7-5 21:04
感谢二楼的帮助，给我解决问题了！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)