微信扫一扫1191
社区成员
DataGrid显示数据库中一个表的内容，我到底错在哪里？
为什么显示不出来！
Private Sub Form_Load()
'连接数据库
On Error GoTo ErrorHandle
Dim Cn As ADODB.Connection
Set Cn = New ADODB.Connection
Cn.ConnectionString = " Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=JXCsystem "
Cn.Open
If Cn.State = adStateOpen Then _
MsgBox " 数据库连接成功！"
Exit Sub
ErrorHandle:
MsgBox Err.Description
End
'显示数据
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "产品信息表", Cn, adOpenKeyset, adLockOptimistic
Set DataGrid.DataSource = rs
'DataGrid.Refresh
End Sub
Private Sub Form_Load()
'连接数据库
On Error GoTo ErrorHandle
Dim Cn As ADODB.Connection
Set Cn = New ADODB.Connection
Cn.ConnectionString = " Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=JXCsystem "
Cn.Open
If Cn.State = adStateOpen Then _
MsgBox " 数据库连接成功！"
Exit Sub
ErrorHandle:
MsgBox Err.Description
End
'显示数据
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "产品信息表", Cn, adOpenKeyset, adLockOptimistic
Set DataGrid.DataSource = rs
'DataGrid.Refresh
End Sub
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
zyugtq 2004-05-08
多谢二位，给分了
- 打赏
- 举报
lihonggen0 2004-05-08
出错之后就end了
没出错就exit sub了
怎么能显示出来？
没出错就exit sub了
怎么能显示出来？
- 打赏
- 举报
victorycyz 2004-05-08
Private Sub Form_Load()
'连接数据库
On Error GoTo ErrorHandle
Dim Cn As ADODB.Connection
Set Cn = New ADODB.Connection
Cn.ConnectionString = " Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=JXCsystem "
Cn.Open
If Cn.State = adStateOpen Then _
MsgBox " 数据库连接成功！"
'显示数据
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "产品信息表", Cn, adOpenKeyset, adLockOptimistic
Set DataGrid.DataSource = rs
'DataGrid.Refresh
Exit Sub
ErrorHandle:
MsgBox Err.Description
End
End Sub
'连接数据库
On Error GoTo ErrorHandle
Dim Cn As ADODB.Connection
Set Cn = New ADODB.Connection
Cn.ConnectionString = " Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=JXCsystem "
Cn.Open
If Cn.State = adStateOpen Then _
MsgBox " 数据库连接成功！"
'显示数据
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseClient
rs.Open "产品信息表", Cn, adOpenKeyset, adLockOptimistic
Set DataGrid.DataSource = rs
'DataGrid.Refresh
Exit Sub
ErrorHandle:
MsgBox Err.Description
End
End Sub
- 打赏
- 举报
C# DataGrid显示数据库内容 C#与Access的操作实例，运用DataGrid数据控件显示数据库的内容，应该说是从事数据库编程，几乎每天都要和DataGrid打交道，用好了DataGrid，编程那就得心应手了，今天分享的C# DataGrid实例仍然是面向初学者，自认为...
datagrid显示mysql_用DataGrid显示数据库内容 usingSystem;usingSystem.Collections;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Web;usingSystem.Web.SessionState;... 显示的数据库内容到底要怎么显示呢？ 展开
VB 绑定数据到DataGrid显示的数据库实例.rar 这是一个在VB中使用 数据库绑定控件DataGrid的实例，演示了如何将从数据库中读取出的数据显示到DataGrid控件中。本例子中包括了很多ADO 操作数据库方面的基本操作，是新手学习VB环境下的ado操作的好范例，比如添加、...
VB利用DataGrid控件显示数据库中数据信息.rar VB利用DataGrid控件显示数据库中数据信息，DataGrid在数据库数据显示的时候非常重要，它在用户操作舒适度及数据排列方面有独到之处，对于Vb数据库编程的用户来说，掌握DataGrid的使用是至关重要的事情。
VB利用DataGrid控件显示数据库中数据信息 摘要:VB源码,数据库应用,DataGrid VB利用DataGrid控件显示数据库中数据信息，DataGrid在数据库数据显示的时候非常重要，它在用户操作舒适度及数据排列方面有独到之处，对于Vb数据库编程的用户来说，掌握DataGrid的...
vb datagrid mysql_vb DataGrid 显示数据库数据 Data Source=PC-20190830UKXS\SQL2014" objConn.Open objRs.CursorLocation = adUseClient objRs.Open "Select * from Company", objConn, adOpenStatic, adLockReadOnly Set DataGrid1.DataSource = objRs If Err....
wpf将表中数据显示到datagrid示例 在.xaml文件中拖入一个datagrid,然后添加列名，使用Binding=”{Binding 数据库中的列名称}”，如下： 代码如下:<DataGrid AutoGenerateColumns=”False” Height=”438″HorizontalAlignment Margin=”23,278,0,0″...
C#中将DataGrid绑定到SQL Server数据库，显示数据库中的数据 思路流程整理 sqlDataadapter的作用是实现 DataTable和 DB 之间的桥梁 ...database=数据库;server=服务器";//SQL Server链接字符串 SqlConnection connSql=new SqlConnection (strConn);...
vb datagrid mysql_在vb中如何只用datagrid控件连接数据库并显示出来 要完整的代码... order by 编号" Set rst = cnn.Execute(Strsql) If Err Then MsgBox "读取数据失败" Exit Sub End If If rst.EOF Then Set DataGrid1.DataSource = Nothing Else Set DataGrid1.DataSource = rst ...
VB 使用DataGrid显示书名数据表.rar VB 使用DataGrid显示书名数据表，这个例子相当简单，主要是学习在VB编程中如何使用DataGrid数据网格控件，将数据库内容读取出来，然后绑定到DataGrid表格中显示： Adodc1.ConnectionString = "Provider=SQLOLEDB.1...
根据ComboBox下拉的值查询数据库表中的内容并显示在DataGridView中 根据ComboBox下拉的值查询数据库表中的内容并显示在DataGridView中 1、在form窗体中添加一个ComboBox和一个DataGridView控件 2、编辑ComboBox的值 3、执行查询语句并将结果给DataGridView的DataSource
EasyUI-DataGrid下数据库数字替换成文本信息显示以及不同状态显示不同颜色 EasyUI-DataGrid下数据库数字替换成文本信息显示 在使用easyui作为开发框架的时候，经常遇到一些常见的问题，比如某项数据名，在数据库里存的是0和1等，然后显示在页面上的时候，需要显示成“是”和“否”，“审核...
WPF 数据库搜索到DataGrid 表格显示 前言 ：本方法用于 从数据库中搜索出的数据集合绑定到 表格控件中。一个页面搜一下查一下感觉挺简单的，但是写到5个以上的这种类似的页面就有些烦了，于是就动了点小脑筋，简化搜索的操作。 封装个通用的集合 ...
