VBA通过ADO连接SQL数据库，但是提示“无法链接到SQL数据库 错误编码 [67]”，问题在哪里呢？

67表示主机地址错误，你下面语句中的【服务器名】要修改服务器的机器名、域名或者IP地址。

constr = "provider=sqlncli10.1persist security info=falseinitial catalog=yearsallshowuser id=sapwd=pswdata source=服务器名"

所有错误代码的含义见连接网页：网页链接

&（连接号）：为连接符，将控件内容和字符串连接起来。

''（单引号）：文本标示符，被包含在一对单引号之内的字符串即为文本型数据。

##（井号）：日期标示符，类似于文本标示符，被包含在井号内的即为日期型数据。

!（叹号）：表示隶属关系，前者为父级，后则为子级，一般出现在记录集或者窗体控件中。

.（点号）：同样为隶属关系，大多用于查询或者表中。

[](中括号）：一般用于控件，中括号内即为窗体控件名称。

()（小括号）：小括号内一般为对象集合的元素，小括号内可以是集合元素的索引值，也可以是元素的名称。

数值型数据则不需要任何标示符。

其实这样解释算不上严谨的，不过大体可以解决了楼主的一些疑惑了。下面以一些例子来说明一下：

a、假定窗体中这两个控件的值：User_Name为whoami13，User_Password=ABC，那么：

temp = "select * From 用户 where 名称=' " &Me![User_Name] &" 'and 密码= ' " &Me![User_Password] &" ' "

相当于：

temp = "select * From 用户 where 名称=' whomai13 'and 密码= ' ABC ' "

b、假定窗体中这两个控件的值：Date为2012-7-5，Money=15，那么：

temp = "select * From 用户 where 名称=# " &Me![Date] &" # and 密码= " &Me![Money]

相当于：

temp = "select * From 用户 where 名称=#2012-7-5# and 密码= 15"

需要注意的是，数据类型必须是相同的，否则无法执行ADO代码。