VB数据库编程上的一个最奇怪的问题
来源:碳中和网
时间:2021-04-13 21:01:01
热度:1
VB数据库编程上的一个最奇怪的问题?
先“工程”--〉引用,加载microsoft ActiveX data Objects2.6 library
然后写代码
public conn as new adodb.connection '定义一个连接,用于连接数据库
public rs as new adodb.recordset '定义一个记录集,用于存放记录
public strSQL as string '用于存放SQL语句
set conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DATABASE.mdb;Persist Security Info=False" '指定连接什么数据库,app.path 为相对路径
conn.open '打开连接,此时就连接上数据库了
strSQL="select * from table" '指定sql语句查询表 table ,sql语句怎么写就不说了
rs.open strSQL ,conn,3,3 '打开数据表
rs.addnew '给表新增加一条记录,在按钮的click事件中写本行代码
rs.field("字段名").value=text1.text '给字段赋值,以此类推,在按钮的click事件中写本行代码
rs.update
set DataGrid1.DataSource = rs '指定datagrid1的数据源
用for循环指定datagrid1的单元格的数据显示
用datagrid1的col、row属性指定,具体单元格
刷新用datagrid1.refresh
思路就是这样,代码自己编写吧
还有就是datagrid1的记录不会自动分页,需要自己写分页代码
你那是数据库还没有打开,或者是干脆就没有连接上,要对数据库进行操作,数据库必须先打开
然后写代码
public conn as new adodb.connection '定义一个连接,用于连接数据库
public rs as new adodb.recordset '定义一个记录集,用于存放记录
public strSQL as string '用于存放SQL语句
set conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DATABASE.mdb;Persist Security Info=False" '指定连接什么数据库,app.path 为相对路径
conn.open '打开连接,此时就连接上数据库了
strSQL="select * from table" '指定sql语句查询表 table ,sql语句怎么写就不说了
rs.open strSQL ,conn,3,3 '打开数据表
rs.addnew '给表新增加一条记录,在按钮的click事件中写本行代码
rs.field("字段名").value=text1.text '给字段赋值,以此类推,在按钮的click事件中写本行代码
rs.update
set DataGrid1.DataSource = rs '指定datagrid1的数据源
用for循环指定datagrid1的单元格的数据显示
用datagrid1的col、row属性指定,具体单元格
刷新用datagrid1.refresh
思路就是这样,代码自己编写吧
还有就是datagrid1的记录不会自动分页,需要自己写分页代码
你那是数据库还没有打开,或者是干脆就没有连接上,要对数据库进行操作,数据库必须先打开
进一步了解相关内容你可以搜索以下相关关键词
windows编程教程 windows编程 编译错误是什么意思 windows窗体应用程序教程 程序结构 vb编程语言大全 Ascll vb未找到方法或数据成员 百鸡问题编程 常见的数据库管理系统 vb每行输出5个数 第一代数据库系统是指上一篇:电脑运行指令有哪些?