当前位置:首页教育技巧excel技巧excel数据库

用vb如何读取excel数据库数据,电子表格怎么在vb中调用数据库

2024-07-22 09:22:55


1. 怎么在vb中调用数据库

Set xlApp = CreateObject("Excel.Application") '创建excel应用程序,打开excel2003 Set xlBook = xlApp.Workbooks.Open(App.Path & "\文件名.xls") '打开已经存在的EXCEL工件簿文件 Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表 for n=1 to 行数 for m=1 to 例数 msgbox xlSheet.Cells.Item(n, m) '注意:我只是告诉你一个循环把你要的内容都读出来,你要拿我的程序去运行会弹死你的 next next

2. vb调用数据库数据库

vb连接sql数据库的步骤如下:

1.先打开控制面板-管理工具-打开数据源-系统DSN-添加驱动程序

2.这里要输入你想要连接的哪个服务器上的数据库

3.这里要输入数据库的帐户跟密码

4.然后一直点下一步,到这一步可以先测试能不能连到连据库

3. 怎么在vb中调用数据库文件

VB可将Sql结构化查询语句赋值Ado(ActiveX 数据对象)或ADO Data 控件,访问和操作数据库。

ADO (ActiveX 数据对象),这项新的数据访问技术的特性包括:更简单的对象模型;与其它 Microsoft 和非 Microsoft 的技术更好的集成;为本地和远程数据数据提供的通用接口;可远程访问的和断开的记录集;用户可访问的数据绑定接口;以及层次结构的记录集。

ADO Data 控件, 这是一种新的、OLEDB 识别的数据源控件,其功能与内部的 Data 控件和 Remote Data 控件十分相似,通过这种方式允许用户用最少的代码来创建数据库应用程序。

Visual Basic 6.0 中,已经可以将任何 ADO/OLE DB 数据源绑定到任何 ADO/OLE DB 数据使用者上。在运行时,可以设置控件的 DataSource 属性来将控件动态地绑定到数据源。可以创建用作数据源和数据使用者的类,并且通过新的 BindingsCollection 对象将这些类绑定在一起。可以创建与 ADO 数据控件相似的、用作数据源的用户控件。还可以创建与 DataGrid 控件相似的、复杂绑定的用户控件。

以下是经ADO (ActiveX 数据对象)访问Access数据库的实例代码:

Dim cnn As New Connection Dim rs As New Recordset Dim sql As String Dim ARR cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\wdOld.mdb;Persist Security Info=False" sql = "select 故障名称 from guzhang_bm" rs.Open sql, cnn Combo1.Text = "故障名称" Do While Not rs.EOF Combo1.AddItem rs("故障名称") rs.MoveNext '打开表 Loop rs.Close cnn.Close

以下是使用ADO Data 控件访问Access数据库德实例代码:

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\wd.mdb;Persist Security Info=False" Adodc1.RecordSource = "select * from jishijilu" ' where shijian like'%8112%' And gyh_riqi like'%10%'" Adodc1.Refresh Set MSHFlexGrid1.DataSource = Adodc1 MSHFlexGrid1.Row = 1 MSHFlexGrid1.ColSel = MSHFlexGrid1.Cols - 1

4. VB中数据库的访问技术

Function ConnectToDataBase() as Boolean ’定义一个连接数据库的函数,返回值为连接成功与否 On Error GoTo DealErr Set db = New Connection db.CursorLocation = adUseClient db.Open "PROVIDER=MSDASQL;driver={SQL Server};server=122.122.107.56,13000;uid=wa;pwd=gvwsgsg;database=reachDb;" ConnectToDataBase=True MsgBox "连接数据库成功!" Exit FunctionDealErr: ConnectToDataBase=False MsgBox "连接数据库失败!" EndEndFunction

5. vb如何使用数据库

dim con as new adodb.connection

dim rs as new adodb.recordset

private sub form_load() '在窗体加载事件中,设置两个文本框内容为空,

B.text="" '设置文本框B内容为空

C.text="" '设置文本框C内容为空

打开数据库连接

con.open "Provider=Microsoft.Jet.OLEDB.4.0;data source=参数.mdb;persist security info=false"

if rs.state<>adstateclosed then rs.close

rs.open "select * from 尺寸",con,1,3

if rs.eof=false and rs.bof=false then

rs.movefirst

while not rs.eof

combox.additem.rs.fields("A") '添加内容到combox中

rs.movenext

wend

end if

end sub

private combox_click()

if rs.state<>adstateclosed then rs.close

rs.open "select * from 尺寸 where A='" & combox.text & "'",con,1,3

if rs.eof=false and rs.bof=false then

B.text=rs.fields("B") '将查找到的内容分别赋给文本框B、C

C.text=rs.fields("C")

end if

end sub

6. vb调用sqlserver数据库

数据库的连接可通过ADO控件实现,须在工程部件中

选择MicrsoftADODataControl6.0(OLEDB),然后在窗体

中添加ADO控件.

利用ADO连接数据库有两种方法,具体如下:

1)通过ADODC属性页实现连接

在ADODC属性页中选择生成按钮,进入数据链接属性对话框;然后选择该对话框中的连接属性页,选择或输入服务器名称和数据库等重要信息;最后测试连接,连接成功后,按确定按钮,返回到属性页对话框,可获得连接字符串,如下例:

Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID=sa;InitialCatalog=Science_File;DataSource=Data_Server

其中sa是用户名;Science_File是数据库名;Data_Server是数据库名。

通过下列语句,即可连接到指定的数据库:

dimodbcstrasString,adoconAsNewADODB.Connection

odbcstr="Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID=sa;InitialCatalog=Science_File;DataSource=Data_Server"

adocon.Openodbcstr'连接到数据库

2)直接使用连接语句实现

连接数据库的语句如下:

DimadoasADODC

ado.ConnectionString="Provider=SQLOLEDB.1;Password="&User_Pwd&";PersistSecurityInfo=True;UserID="&User_Name&";InitialCatalog="&Data_Name&";DataSource="&server_name

其中User-Pwd是用户密码;User_Name是用户名;Data_Name是数据库名;server_name是服务器名。

7. 在vb环境中通过什么数据控件访问数据库

1、Access中新建数据库,名字为Database1.mdb。(注意:后缀为MDB,如果Access是2007版本的,保存时应另存为03版本的才可以,因为,VB无法直接支持07版的accdb后缀格式)

2、成功建立数据库后会进入到数据表界面,这时就能输入数据了,输完以后按CTRL+S保存,输入表名,这里表名为test,准备工作这样就完成了。

3、把VB打开,然后新建标准exe。

4、在菜单里面找到工程→部件→勾选 ,Microsoft ADO Data Control 6.0 Microsoft Hierarchical Flexgrid Control 6.0勾选之后左侧的工具栏里就多出两个控件,就是 ADODC控件和MSHFlexGrid控件。

5、选择 ADODC控件和MSHFlexGrid控件,在窗体的合适位置放入,如图:

6、设置ADODC控件的属性:右键窗体中ADODC1控件

ADODC属性页→通用→选择使用连接字符串→点击生成→选择Microsoft Jet 4.0 OLE DB Provider 点击下一步→选择之前准备好的数据库→点击测试连接,显示测试成功则ok,确定。

ADODC属性页→记录源→命令类型选择2-adcmdtable,表或存储过程名称选择之前建立的数据表test,点击确定,ADODC属性设置完成。

7、设置MSHFlexGrid控件的属性:VB右侧的属性表里,找到datasource,选择adodc1。

8、测试效果:菜单→运行→启动(F5),发现显示的数据排列不是我们想要的行数和列数修改方法:

MSHFlexGrid属性→通用→设置行和列,固定行和固定列,设置如图。

MSHFlexGrid属性→带区→把列标题的√取消掉,设置如图。

9、修改之后测试效果如下:

8. vb怎么做数据库管理

利用ACCESS建立一个关于仓库的数据库和各种数据表。VB则采用ADO数据控件和DATAGRID控件,在SQL结构化查询语句下建立ADO数据控件和DATAGRID控件之间的关联。建议若干窗体,用于数据表输入等。编写VB的代码,完成这个简单的仓库管理系统。

相关信息


电脑版

【免责声明】本站信息来自网友投稿及网络整理,内容仅供参考,如果有错误请反馈给我们及时更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任。
版权所有:学窍知识网 Copyright © 2011-2024 www.at317.com All Rights Reserved .