qzgx.net
当前位置:首页 >> vB数据库查询语句 >>

vB数据库查询语句

基于ADODC控件和DATAGRID控件的灵活应用.具体做法: 新建工程时选数据工程,此时VB6集成调试环境左边工具箱内已加载了有关数据库编程必须的控件.然后在FORM1窗体中添加ADODC控件和DATAGRID控件,将DATAGRID1的属性

不知道你写的什么. a="select count(*) from sheet1 where (对错='对')" 你怎么能把字符串赋值给int类型的. 我大概写一下吧. dim sSql as string dim Rs as new adodb.recordset sSql="select count(*) from sheet1 where 对错='错' group by ……" Rs.Open sSql, Conn, 3, 3 其中conn是你连接数据库的连接Connection,应该事先就连接好了的(这个没有的话就不用做了,具体连接access数据去查资料吧) 然后直接把 RS.field("") 放到text里去.

Private Sub cmdYK_Click() lst1.Clear Label2.Caption = "" Label3.Caption = "" Label4.Caption = "" Dim cn As ADODB.Connection Set cn = New ADODB.Connection Dim c As String cn.Open "provider=microsoft.jet.oledb.4.0; data

要看你的参数的类型如果是字符型:"select * from 表 where 字段名='" & 变量 & "'"如果是数值型/逻辑型"select * from 表 where 字段名=" & 变量如果是日期型"select * from 表 where 字段名=#" & 变量 & "#"

查询语句用"select",最简单的就是直接用以下语句:sql:select * from tablename;从表“tablename”中查询出所有的数据.扩展:后面还可以增加“where”条件进行筛选.sql:select * from tablename where id 评论0 0 0

like语句要配合sql里的通配符进行模糊查询的,1 ,11 ,111 这三个数是这样 sql = "select * from 厂家资料 where 厂家手机 like '" & trim(text1.text) & "%'"

单从字面上看一楼的代码和楼主是一样的,估计是楼主实际的代码中由于手误等原因多了空格:'" & a & " ' 这里要注意单引号和双引号之间不要有空格,另外要保证text中录入的时候不要有空格,或者赋值的时候处理下:a=trim(text1.text).希望对你有帮助

"SELECT sno,sco FROM sco WHERE sno='" & text1.text & "'" 因为现在不弄VB6了,所以具体怎么连接的代码我忘了,大概就是如果得到的结果RecordSet是空的,即Bof And Eof,则用户名错误,否则如果规定了用户名不可重复,就有且仅有1条记录,再比较其中的sco与Text2.Text是否相等,是则正确通过,否则密码错误.

S="Select L1,L2,L3,L4 From [表名] Where "S=S & "L1>" & A & " Or "S=S & "L2>" & A & " Or "S=S & "L3>" & A

在VB6中可用ADO及DATAGRID控件,用如下语句可更灵活:Private Sub Form_Load() Text1 = "" With Adodc1 Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db1.mdb;Persist Security Info=False" Adodc1.

xmlt.net | zhnq.net | zxpr.net | tuchengsm.com | rtmj.net | 网站首页 | 网站地图
All rights reserved Powered by www.qzgx.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com