vb.net数据库查询 vb访问数据库

在vb.net中如何查询MDB数据库的数据

以下是完整模块

创新互联建站专业为企业提供钦北网站建设、钦北做网站、钦北网站设计、钦北网站制作等企业网站建设、网页设计与制作、钦北企业网站模板建站服务，10年钦北做网站经验，不只是建网站，更提供有价值的思路和整体网络服务。

Imports

System.Data

Imports

System.IO

Imports

System.Data.OleDb

Module

Module1

Public

New

OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data

Source="

Application.StartupPath

"\mdb数据库名字.mdb")

'定义连接

Public

DataBaseRST

Integer

'用来返回数据库执行结果

Public

Function

DataModify(ByVal

str

String)

Boolean

'进行数据库修改操作

Dim

cmdinsert

New

OleDbCommand

Try

cmdinsert.CommandText

str

cmdinsert.Connection

cn.State

ConnectionState.Closed

Then

cn.Open()

DataBaseRST

cmdinsert.ExecuteNonQuery()

'用来返回执行的结果

cn.Close()

Return

True

Catch

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

Public

Function

Search(ByVal

str

String,

ByVal

DGV

DataGridView)

Boolean

'查询

str---查询命令，DGV---DataGridView，用来显示数据的控件

Dim

New

DataTable

Try

Dim

New

OleDb.OleDbDataAdapter(str,

cn)

ap.Fill(tb)

DGV.DataSource

Return

True

Catch

Exception

MessageBox.Show(Err.Description,

"Error",

MessageBoxButtons.OK,

MessageBoxIcon.Error)

Return

False

End

Try

End

Function

End

Module

'以下是调用方法

DataModify("

insert

into

values

('1','2')")'-------这里是数据库更新操作

Search("select

from

aa",DataGridView1)'-----------这里是数据表查询操作

如何用vb.net查询、添加、删除、修改数据库(需要很详细的代码)？

sQueryString是SQL（增删查改）语句

public

Boolean

ExecSQL(string

sQueryString)

{

SqlConnection

con

new

SqlConnection(ConfigurationManager.AppSettings["conStr"]);

con.Open();

SqlCommand

dbCommand

new

SqlCommand(sQueryString,

con);

try

{

dbCommand.ExecuteNonQuery();

con.Close();

}

catch

{

con.Close();

return

false;

}

return

true;

}

建立一个类，明自己取，然后调用就是了

例如：

类

BC=NEW

类（）；

STRING

ist="INSERT

INTO

XX(1,2,3)VALUES(A,B,C)";

BC.ExecSQL（ist）;

就可以了

vb.net 中如何使用SQL语句查询数据库中的数据

1、首先打开Visual Studio 2008代码窗口，添加引用。

2、输入以下代码：Public conn1 As SqlConnection = New SqlConnection 。

3、声明关键字 Public；（因为是全局变量，所以用Public 来声明）。

4、如果SQL 数据库就在本机，则用以下代码连接。

5、如果代码太长，影响可读性，可以用空格加"_"后，回车换行即可。

vb.net 中如何使用SQL语句查询数据库

dim

myselectquery

string

"select

from

表1

where

姓名='小强'"

dim

mycommand

new

sqlcommand

(myselectquery,

conn)

'建立一个command控件，conn是你的sqlconnection对象

conn.open()'打开数据连接

dim

myreader

sqldatareader'定义一个reader用来读数据

myreader

mycommand.executereader()'运行你的查询，结果到myreader

myreader.read()

then

'如果查到了数据

msgbox(myreader.getstring(0))

'显示第一个字段

end

关于vb.net 数据库查询

'各项查询条件为空的时候用 1=1来代替

'例如：

tmpSelIDStr=Trim(txtSelectId.Text)

if tmpSelIDStr="" then

tmpSelIDStr=" 1=1 "

Else

tmpSelIDStr=" 员工编号='" tmpSelIDStr "'"

End If

'同理其它的都这么处理

'最后合并起来

sqlstr="select ..... from .... where " tmpSelIDStr " and " tmp ....

'不知道这样回答你是否可以理解