vbsql

㈠ vb怎么执行sql语句

先是定义一个字符串变量，然后把你要写的SQL语句赋给它。这时如果要把一些VB控件里的数据加进去也一样就是一个字符串联接而以，唯一要注意的是标点符号的使用如：' 这个符号，因为很多时候要用到这个，我碰到好多人都是这里出错了。例如：Dim strsql As String
strsql = "select * from TblSystemData"
If dh.Text <> " " Then '单号
strsql = strsql & " where ChrCode like " & "'" & dh.Text & "'"
End If
当然你也可以把第一个它移到前面去。但我是单独放出来，这样更清楚一点。
接着是执行了。这个你可以看一下二楼的。例如：rst3.Open strsqlm con1_offer, adOpenKeyset, adLockOptimistic, adCmdText

㈡ VB如何写SQL语句

sql="select * from (表格名字) where id='" & text1.text & "' and name='" & text2.text & "' and age="' & text3.text & "' order by id asc"
order by id asc 这句意思是按id升序排列，可写可不写。

㈢ VB连接SQL

问题补充：
“我想知道相对地址连接~~是SQL
移到的机子上不装SQL那怎么办？？”
1、SQL数据库连接必须是服务器，不用地址，因为在安装SQL
Server
2000
后，你的数据库地址已经确定；
2、在一般情况下不安装是不可以的，对于Access数据库现在的操作系统有其驱动，而没有SQL的，除非使用网络，例如局域网。
SQL
SERVER
2000
数据库代码比较简单，无非数据库连接语句不同，其他和Access数据库没有大的区别。
如果“程序要移动到其他机子上”，移动到的机子上必须同样安装SQL
SERVER
2000
数据库，而且服务器名称、数据库名称必须和原服务器名称、数据库名称相同，如果有数据库密码，必须保持一致。
下面是SQL数据库连接代码，请参考：
Public
conn
As
New
ADODB.Connection
conn.ConnectionString
=
"driver={SQL
Server};server=服务器名称;uid=sa;pwd=密码;database=数据库名称"
conn.Open

㈣ sql语言和VB语言的区别

sql是数据库语言，VB是编程语言
Visual Basic是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说，VB都是世界上使用人数最多的语言——不仅是盛赞VB的开发者还是抱怨VB的开发者的数量。它源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。
结构化查询语言(Structured Query Language)简称SQL，结构化查询语言是一种数据库查询和程序设计语言，用于存取数据以及查询、更新和管理关系数据库系统；同时也是数据库脚本文件的扩展名。结构化查询语言是高级的非过程化编程语言，允许用户在高层数据结构上工作。它不要求用户指定对数据的存放方法，也不需要用户了解具体的数据存放方式，所以具有完全不同底层结构的不同数据库系统可以使用相同的结构化查询语言语言作为数据输入与管理的接口。结构化查询语言语句可以嵌套，这使他具有极大的灵活性和强大的功能。

㈤ vb怎么连接sql

一、配置ODBC数据源
1、在控制面板中，双击管理工具，然后打开ODBC数据源管理器。
2、在“系统DSN”选项卡中，单击“添加”按钮，打开“创建新数据源”对话框，在“名称”列表框中选择“SQL Server”。选好单击完成
3、在打开“建立新的数据源到SQL Server”对话框，在“名称”文本框输入新数据源的名称，描述数据源按理解的方式来写(随意)。“服务器”就选择要连接到的服务器。
4、选择使用用户输入登录的ID和密码的SQL 验证
。选连接SQL默认设置
5、再下一步下一步，完成。测试数据源看连接是否成功就行了。成功后按确定。
二、VB中设置连接
1、添加部件Mircrosoft ADO Data Control 6.0(OLEDB),把部件拖到窗体。
2、对ADO部件点右键选属性，选择使用连接字符串，按生成。
3、选择Mircosoft OLE DB Providar for SQL Server
按下一步
1、输入服务器名称
2、使用指定的服务器信息
3、在服务器上选择数据库
这时就选择在SQL Server建好的数据库就行了
5、测试连接可以看到连接是否成功。

㈥ vb中如何执行SQL语句

Private Sub Command1_Click()
On Error GoTo errhandle
Dim conn As New ADODB.Connection, rs As New ADODB.Recordset

If Trim(Text1.Text) = "" Then
MsgBox "没有输入sql语句"
Exit Sub
Else
If Left(Trim(Text1.Text), 6) = "select" Then
MsgBox "不是查询语句"
Exit Sub
End If
End If

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "test.mdb;Persist Security Info=False"
rs.Open Trim(Text1.Text), conn, adOpenKeyset, adLockOptimistic
Set DataGrid1.DataSource = rs
DataGrid1.Refresh
Set rs = Nothing
Set conn = Nothing
rs.Close
conn.Close
Exit Sub
errhandle:
MsgBox "输入的sql语句有误"
End Sub

㈦ 关于SQL和VB的一些区别

sql是数据库操作语言，VB是计算机语言
VB是利用SQL语言来操作数据库

㈧ VB 执行SQL语句

VB中“对象关闭时，不允许操作”解决方案

最近两天在VB里弄一些小程序，好久没接触了，感觉有些陌生了，还算有点基础吧，遇到一些小的难题基本上都能解决。不过，这下真的遇到难题了，琢磨半天硬是没弄出结果来，在网上查资料也没个底，如同大海捞针呀，关键是没一点正经的答案和可行的方案。

问题是这样的，在VB中执行存储过程，想输出返回值并将数据绑定到DataGrid控件中，本来是件小菜的问题，在.NET、ASP里都做通过，但在VB里却是折磨了半天也没弄出来。还是自己动手吧，有问题就得想办法，一步步来吧。

先在SQL 2000中写好存储过程了，（这里不再写出存储过程的具体代码了，也就是一个返回值，一个记录集）然后在VB中引用ADO对象，输入如下代码，以调用存储过程：
Dim lackconn As New ADODB.Connection
lackconn.ConnectionString=Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Password=boyd;Initial Catalog=mydb;Data Source=(local)
lackconn.CursorLocation = adUseClient '设置为客户端
lackconn.Open

Set lackcmd = New ADODB.Command
lackcmd.ActiveConnection = lackconn
lackcmd.CommandText = myproc '这里为存储过程名称
lackcmd.CommandType = adCmdStoredProc '指定为存储过程
Set param = lackcmd.CreateParameter(@num, adInteger, adParamReturnValue, 4) '@num为返回值
lackcmd.Parameters.Append param
Set lackrs = New ADODB.Recordset
Set lackrs = lackcmd.Execute()
msgbox 站点总数： & lackcmd.Parameters(@num).Value & 个

Set mydatagrid.DataSource = lackrs 'mydatagrid为对象名称
mydatagrid.Refresh '刷新DataGrid
'下面关闭数据库对象等略去

就这样的一个简单的代码，一运行就出错，提示错误在“Set mydatagrid.DataSource = lackrs”，错误就是“对象关闭时，不允许操作”。郁闷ing...，这哪来的错误呢？我根本没关闭数据库连接，其他内容也是没有问题的呀。花了很长时间没能解决，大清早再打开电脑时，灵机一动，搞定了。这里将这种现象作下总结，顺便记录一下本次解决过程。

产生这种现象有几种原因：
1、数据库对象连接被关闭了，这肯定会报错的，当然也不能输出任何结果的，这时只需注意“先使用、后关闭”就行了，解决这样的问题就是暂时先不要关闭数据库连接就行了。

2、返回记录为空时，也会报错。如下面的代码
sql = select * from dbcn where 状态='0'
Set rs = conn.Execute(sql)
If Not rs.EOF Then
For m = 1 To rs.RecordCount
List_status.AddItem rs(1) & （ & rs(2) & ）： & rs(4)
rs.MoveNext
Next m
End If
如果没有数据的话，这里也会提示这样的错误，将查询代码放到SQL查询分析器里运行一下，果然没有数据，呵呵。当然这样的错误可以采用一些方法排除或过滤的。

3、这就是我这次所遇到的问题的中心了，我们将目光转向存储过程。的确，在SQL查询分析器里，存储过程是正常运行，而且不会报错，也有数据。但仔细想想，因为在存储过程可能包含了有关SQL语句影响行数的信息，这样一来也就可能会导致这样的情况。
打开存储过程，在begin后面加上一句代码：set nocount on，屏蔽掉这些信息。OK，VB中的程序巳经能够正常运行了，而且数据也是正常的。

顺便解释一下吧，打开查询分析器中的帮助，查找一下有关set nocount on的信息，我们会找到这些东西：
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
SET NOCOUNT
使返回的结果中不包含有关受 Transact-SQL 语句影响的行数的信息。
语法
SET NOCOUNT { ON | OFF }
注释
当 SET NOCOUNT 为 ON 时，不返回计数（表示受 Transact-SQL 语句影响的行数）。当 SET NOCOUNT 为 OFF 时，返回计数。
即使当 SET NOCOUNT 为 ON 时，也更新 @@ROWCOUNT 函数。
当 SET NOCOUNT 为 ON 时，将不给客户端发送存储过程中的每个语句的 DONE_IN_PROC 信息。当使用 Microsoft® SQL Server™ 提供的实用工具执行查询时，在 Transact-SQL 语句（如 SELECT、INSERT、UPDATE 和 DELETE）结束时将不会在查询结果中显示nn rows affected。
如果存储过程中包含的一些语句并不返回许多实际的数据，则该设置由于大量减少了网络流量，因此可显着提高性能。
SET NOCOUNT 设置是在执行或运行时设置，而不是在分析时设置。
权限
SET NOCOUNT 权限默认授予所有用户。
示例
下例在 osql 实用工具或 SQL Server 查询分析器中执行时，可防止显示有关受影响的行数的信息。
USE pubs
GO
-- Display the count message.
SELECT au_lname
FROM authors
GO
USE pubs
GO
-- SET NOCOUNT to ON and no longer display the count message.
SET NOCOUNT ON
GO
SELECT au_lname
FROM authors
GO
-- Reset SET NOCOUNT to OFF.
SET NOCOUNT OFF
GO

这里点到为止吧，具体的解释我想MS的帮助会比我说的更专业更清楚些，参考下吧。

㈨ vb中怎么使用sql

select * from 成绩表 where 姓名='张大保'
翻译为中文就是
从“成绩表”中选择所有姓名是“张大保”的记录
From 从...... From 成绩表 就是“从成绩表...”的意思
Form 是表格、表单的意思，用在这里是没意义的
另外在条件前面要加上where，意思就是在什么地方去找你要的东西
这些都是最基本的，你先把sql的语法搞清楚了再到VB中应用