难道我自己的眼睛有问题吗？我是3.0呀!!!

[jwx0421]

我写的语句为：
Strsql="select * from 原始成绩表 where 学号 like '" & Combnianji.text & "%'"
Dim AdoNew1 As ADODB.Recordset
Set AdoNew1 = New ADODB.Recordset
AdoNew1.Open Strsql, StrConn, 3, 3
用VB的逐步调试（按F8）始终显示符合条件的记录数为0（但其实符合条件的记录数并不为0），此时因为Combnianji.text 的内容为2001，所以Strsql="select * from 原始成绩表 where 学号 like '2001%'"(VB在调试状态下显示的），后来我直接将语句改为Strsql="select * from 原始成绩表 where 学号 like '2001%'"，再执行符合条件的记录数就正确了！真是奇怪：Strsql="select * from 原始成绩表 where 学号 like '" & Combnianji.text & "%'" 在调试的状态下其实明明就是Strsql="select * from 原始成绩表 where 学号 like '2001%'"呀，但为什么结果初步来呢？

[jwx0421]

我今天中午回去试了，我用str$(trim(combnianji.text))将combnianji.text的内容转化为字符型了，学号字段我在数据库中也是char型呀！但为什么还是0？？？？？？？？愁呀！！！！！！

[hzybc]

'" & Combnianji.text & "%'"

改成,试一下看
'" & Combnianji.text & "' & '%'"

[huangjw]

应该是类型不匹配，

[zhenglc]

trim(combnianji.text)

[huangjw]

Combnianji.text 是字符型，2001所在的字段你设置的是不是字符型把，虽然显示的都一样，但是他俩不相等。强制转换其中一个就行

[jwx0421]

太感谢三位老师了，这么快就回信了！！！

[jwx0421]

谢谢楼上的几位大虾，虽然问题现在还尚未解决，但是有了你们我充满信心！我是刚参加工作，校长让做这个东西，时间很紧！我觉得压力很大！希望你们帮忙帮到底，我把你们的意见回去试一下，如果不行的话我再把情况告诉你们，你们再给我出出主意！！！不胜感激！！！！感激涕零！！！！！谢谢谢谢！！！！！！

[hansblue]

改成'"&trim(combnianji.text &"%")&"'试试
检查类型对不对?
如果正确,你把debug.print产生的语句在SQL上执行一下看对不对??
如果在不对,肯定是你程序出了问题.