vb显示数据库数据
A. 如何使数据库的内容在vb中显示
大致上有两者方法,一是用控件,VB自带的ADODC+DATAGRID,设置DataGrid.DataSource为ADODC即可
二是用代码连接数据库,通常用 ADO+DataGrid。引用ADO库,定义Connection对象打开数据库,Recordset对象执行查询,并将数据显示在DataGrid里。
B. 在VB中,怎样对SQL数据库里面的数据进行操作
方法1,
建立一个模块
将工程的启动设置为 SUB MAIN
在模块里写下面代码
Public db As Database
Public rs As Recordset
Sub main()
set db=db.opendatabase("数据库路径"<建议用相对路径--就是把数据库文件和工程文件放在同一目录下--相对路径就是APP.PATH+"数据库名带后缀">)
第一启动窗体<比如:form1>.show
end sub
以后在其他窗体中如果要调用数据库只用在窗体中写代码
set rs=openrecordset(<可以是数据库的表--如"student",也可以是查询语句--如"select* form student">)
这时数据库的内容都存在FILE集合里
比方说set rs=openrecordset("select* form student")
rs.file(0)就是SQL语句查询结果的第一列
rs.files就是整个结果
使用text1.text=rs.file(0)就可以把文本框于查询结果帮定起来
如果要对数据库进行修这时用以下代码:
db.Execute (<SQL语句--如"insert into student(sno,sname) value("","")">)
方法2,
工程--部件--选择microsoft data bound grid control 5.0
然后在窗体中添加左边工具栏的 DATA 和DBGRID 控件
选择DBGRID 将属性DATASOURCE 设置为DATA控件的名字(如DATA1)
然后选择DATA 将属性CONNECT设置为ACCESSS 2000
设置DATABASENAME 选择数据库的存放路径
最后设置RECORDSET 为需要连接的表的名字
运行就可以看到 DATAGRID中显示了数据库的信息
C. vb中如何把查询到的数据显示在msflexgrid上呢 请高手来围观解答啊
是否又是你在问这个问题了?
你连接的是否为Access 数据库?下面以Access 数据库为例子:
先看一下结果。
窗体中放置好各控件,Form_Load()增加如下的程序:
Private Sub Form_Load()
With Data1
.Connect = "Access"
.DatabaseName = "D:vbTempmyDB.mdb" ‘数据库所在的全路径及名称
.RecordSource = "SELECT * FROM T101 ORDER BY F1" '这里的T101是我用的表名称
.Refresh ’F1 是我用的字段名称
End With
End Sub
“查询”按扭增加如下的程序:
Private Sub cmdFind_Click()
With Data1
.RecordSource = "SELECT * FROM T101 WHERE F1 Like '" + Trim(txtCode) + "*'"
.Refresh
End With
End Sub
1、添加 MSFlexGrid 控件:
“工程”->"部件"->"选择 Microsoft FlexGrid Control 6.0"->"确定"
2、Data 控件应该会设置吧
3、窗体上放置该控件,设置其 DataSource 属性=Data1
3、添加需要的程序
4、程序中的 "F1" 是我用字段名称,代表的是“错误编号”
5、查询中用 Like 语句可以获得相关的结果,也可以用 "=" 但后面不需要*“符号
"SELECT * FROM T101 WHERE F1='" + Trim(txtCode) + "'"