问题描述
PrivateSubForm_Load()'初始化查询条件CboQueryCboQuery.AddItem("DID")CboQuery.AddItem("PID")CboQuery.AddItem("SIID")CboQuery.AddItem("SNum")CboQuery.ListIndex=0'默认查询条件为所属部门IDCallLoadDataEndSubPrivateSubLoadData()'装载数据DimcolNameAsString'保存所选择的查询条件DimcolValueAsString'保存所要查询的具体值DimstrWhereAsString'得到查询条件colName=Trim(CboQuery.Text)'取出条件的值colValue=Trim(txtQuery.Text)'取出所要查询的值'构建条件strWhere="where"&colName&"like'%"&colValue&"%'"Setrs=Nothing'查询员工基本信息SQL="select*formSI"&strWhere&"orderbySID"CallSelectSQL(SQL,msg)Setrs=SelectSQL(SQL,msg)SetMe.DataGrid1.DataSource=rs'在DataGrid中显示查询的结果DataGrid1.RefreshIfrs.RecordCount=0Then'如果不存在记录'编辑控件可用性CmdAdd.Enabled=TrueCmdModify.Enabled=FalseCmdDelete.Enabled=False'移动控件不可用ForIndex=0To3Command(Index).Enabled=FalseNextIndexElse'编辑控件可用性CmdAdd.Enabled=TrueCmdModify.Enabled=TrueCmdDelete.Enabled=True'移动控件可用ForIndex=0To3Command(Index).Enabled=TrueNextIndexEndIfEndSub就是进去没显示的···
解决方案
解决方案二:
打印一下,看看SQL对不对下边这句where后就少了空格strWhere="where"&colName&"like'%"&colValue&"%'"
解决方案三:
调试的时候把鼠标放在你的strwhere上面点击放大镜把SQL语句复制出来查看下
解决方案四:
断点。。看SQL语句
解决方案五:
看下语句有取到数据没、再看下数据源绑定了没、
解决方案六:
结贴率提高点
解决方案七:
走断点就知道哪有错了
解决方案八:
多半就是你的这句where后面没有空格strWhere="where"&colName&"like'%"&colValue&"%'"如果项目中SQL语句都是这样灵活的组成的话,调试的时候多看看得到的SQL语句对不对吧,有时候就是一个空格或是一个单引号的问题呢
解决方案九:
引用1楼xuexiaodong2009的回复:
打印一下,看看SQL对不对下边这句where后就少了空格strWhere="where"&colName&"like'%"&colValue&"%'"
空格有了还是不对么
解决方案十:
引用2楼yankai159357的回复:
调试的时候把鼠标放在你的strwhere上面点击放大镜把SQL语句复制出来查看下
这个弄不出来么····