用vb如何读取excel数据库数据,电子表格怎么在vb中调用数据库
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的代码,完成这个简单的仓库管理系统。