相同数字如何检测

ycxchen

我认为7、8楼的方法较好，9楼的方法对固定的11111111111号码才有用，不灵活。

ycxchen

7楼及8楼的办法我都应用了,但运行时RUNSQL操作需要参数,如何解决?盼指教.

ycxchen

不好意思，13楼所说的是指但运行时提示出错，说RUNSQL操作需要参数。如何解决?盼指教.

Henry D. Sy

RunSQL
只能是，操作查询，并不返回记录集。

ycxchen

dddddd大哥，我想打开查询查看检测结果，哪如何修改SQL语句呢？请指点。

Henry D. Sy

最简单的办法就是
作个查询（也就是上面我给你的查询），然后在按钮事件中打开他。
docmd.OpenQuery

ycxchen

十分感谢dddddd大哥！两个问题请教：
1、你说“的RunSQL操作查询不返回记录集”是什么意思？能举个例子说明一下吗？
2、对14楼的问题我真的弄不明，请你帮我在我的例子中修改一下吧，先感谢了！

Henry D. Sy

在 Visual Basic 中，RunSQL 方法执行 RunSQL 操作。

expression.RunSQL(SQLStatement, UseTransaction)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

SQLStatement  必需 Variant 型。字符串表达式，表示操作查询或数据定义查询的有效 SQL 语句。它使用 INSERT INTO、DELETE、SELECT...INTO、UPDATE、CREATE TABLE、ALTER TABLE、DROP TABLE、CREATE INDEX 或 DROP INDEX 语句。如果要访问其他数据库，则应包含 IN 子句。

UseTransaction  可选 Variant 型。使用 True (-1) 可以在事务处理中包含该查询。如果不想使用事务处理，则应将该参数设为 False (0)。如果将该参数留空，则采用默认值 (True)。

[ 本帖最后由 dddddd 于 2008-10-8 01:24 编辑 ]

Henry D. Sy

1
将下面的查询保存为 A
SELECT 游客表.姓名, 游客表.地址, 游客表.手机, 游客表.固定电话
FROM 游客表
WHERE (((CompareField([手机]))=True));
2
然后，在输入下面的代码
Private Sub Command9_Click()
    DoCmd.OpenQuery "A"
End Sub

ycxchen

万分感谢dddddd，你真是大哥级的高手！