类型不匹配，求帮助

20090930 · 发表于 2016-6-24 16:03

Dim qdf1 As QueryDef
SSet qdf1 = dbs.CreateQueryDef("数学成绩不重复", strSQL1)

类型不匹配，求帮助

Renco · 发表于 2016-6-24 16:33

dbs
是什么、？？？？

20090930 · 发表于 2016-6-24 17:00

dbs
数据库系统

Renco · 发表于 2016-6-24 17:14

你在哪里声明和赋值了这个变量dbs啊？？

20090930 · 发表于 2016-6-24 17:37

本帖最后由 20090930 于 2016-6-24 17:40 编辑

Dim dbs As Database, strSQL1 As String
Dim qdf1 As QueryDef
      Set dbs = CurrentDb

      strSQL1 = "SELECT 数学成绩不重复.* " & _
      "FROM 数学成绩 " & _
      "WHERE (((数学成绩.编号)" & val编号 & ") " & _
      "AND ((数学成绩.学生编号)" & val学生编号 & ") " & _
      "AND ((数学成绩.学生姓名)" & val学生姓名 & ") " & _
      "AND ((数学成绩.数学成绩)" & val数学成绩 & ") " & _
"AND ((数学成绩.工)" & val数学成绩 & ") "

SSet qdf1 = dbs.CreateQueryDef("数学成绩不重复", strSQL1)
      DoCmd.OpenQuery qdf1.Name

      dbs.Close

20090930 · 发表于 2016-6-25 15:47

发现了错误，原来倒数第三行的SSet多了个S，应改为Set

		自动登录	找回密码
密码			免费注册

[求助] 类型不匹配，求帮助