一条不懂的语句请帮忙

[surdon]

VB菜鸟 如何用ADO控件 实现以下的功能呢？

Data2.Recordset.FindFirst "品名编号 = '" & text1.Text & " '"

[gemgama]

上面的语句本身就是ADO控件实现的功能，是不是想用Adodc控件而不用Data控件？
Adodc1.Recordset.FindFirst "品名编号 = '" & text1.Text & "'"

[surdon]

可是我用过这条语句
Adodc1.Recordset.FindFirst "品名编号 = '" & text1.Text & "'"
结果 出错 找不到对像 FindFirst

[yiming616]

Up

在推存一个VB小工具

软件名称：VB代码计算器
软件类型：编程工具
编程环境：VB6 + SP5
适用系统：Win9x/2k/XP

■ 软件介绍

本程序能显示出你编写的VB源代码一共写了多少行，同时也支持其他类型的文件计算。特点：①界面美观，操作方便，你只需拖动你保存好的VB工程（组）文件到本程序窗口就可显示出源代码的总行数。②能自动分析VB工程（组）内包含的文件（这是可选的，也可以不自动分析并把他当作普通文件计算），并分别计算出每个文件所包含源代码的行数。③能自动隔离VB文件中由VB自动生成的代码，只计算用户输入的源代码，并可选择是否要排除空行或注释行的计算。④支持计算非VB文件，如文本文件、ini文件等。计算该类文件时只能排除空行的计算，其他只要不是空行都会累加到总行数中。⑤可暂停正在计算中的任务。⑥可以保存计算结果和被计算文件列表为文本文件，方便以后查询或打印输出。


下载地址：
华军软件 http://www.onlinedown.net/soft/7545.htm
天空软件 http://www.skycn.com/soft/12423.html

[bigbigfans]

up

[gemgama]

你的这一条语句是抄来的吧?
FindFirst应该是一个自己写的函数
我看这样写吧:

Adodc1.Recordset.Find "品名编号 = '" & txtname.Text & "'", , , 1

这样不用写findfirst函数也可以达到findfirst的效果.

[gemgama]

:) txtname.Text 应该是你的 text1.text 才对

Adodc1.Recordset.Find "品名编号 = '" & text1.Text & "'", , , 1

[wenhaonan]

同意楼上的！~