经测试,在 JET 4.0 (Access 2000 及以后版本中) 支持 BAND(Binary AND) / BOR(Binary OR) / BXOR(Binary XOR) 操作。但不能用于 ACCESS 查询。可以通过 ADO 语句调用。
例: Function TestBand() Dim rs As New ADODB.Recordset Dim strSql As String strSql = "SELECT c2, (c2 BAND 2) As MyResult FROM cc;" rs.Open strSql, CurrentProject.Connection, adOpenKeyset, adLockOptimistic Do While Not rs.EOF Debug.Print rs!c2, rs!MyResult rs.MoveNext Loop rs.Close Set rs = Nothing End Function 运行结果:
1 0
2 2 3 2 4 0 5 0 6 2 7 2 8 0 9 0 可是, 未找到任何正式的文档说明.
2004.08.10 |
|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )
GMT+8, 2024-5-5 17:36 , Processed in 0.069041 second(s), 16 queries .
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.