| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2098 人关注过本帖
标题:查询数据代码出现问题
取消只看楼主 加入收藏
燕之峰
Rank: 2
等 级:论坛游民
帖 子:146
专家分:63
注 册:2014-3-21
结帖率:100%
收藏
已结贴  问题点数:10 回复次数:1 
查询数据代码出现问题
各位网友好,现有一窗体作为查询界面,根据资料书写代码如下
Public Class Form1
    Dim mybind As BindingManagerBase
    Dim strconn As String = "provider=microsoft.jet.oledb.4.0;data source=mingdan.mdb"
    Dim objconn As New oledbconnection(strconn)
    Dim objadap As New oledbdataadapter
    Dim objdset As New DataSet
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim strsql As String
        objconn.open()
        objdset.Clear()
        If Trim(TextBox1.Text) = "" Then
            strsql = "select * from huojiang"
        Else
            strsql = "select * from huojiang where 获奖等级='" & TextBox1.Text & "'"
        End If
        Dim objadap As New oledbdataadapter(strsql, objconn)
        objconn.close()
        objadap.fill(objdset, "huojiang")
        DataGridView1.DataSource = objdset.Tables("huojiang")
    End Sub   
End Class
运行时提示如下
错误    1    未定义类型“oledbconnection”
错误    2    未定义类型“oledbdataadapter”   
错误    3    未定义类型“oledbdataadapter”
请问错在哪里,应如何处理 。
查询记录.rar (42.59 KB)

请指导,谢谢
程序在附件中

[ 本帖最后由 燕之峰 于 2014-11-19 15:57 编辑 ]
搜索更多相关主题的帖子: 资料 友好 
2014-11-19 15:46
燕之峰
Rank: 2
等 级:论坛游民
帖 子:146
专家分:63
注 册:2014-3-21
收藏
得分:0 
哦,可以了
加上
Imports System.Data.OleDb
但不知这是何意,请网友告诉一下
2014-11-19 20:26
快速回复:查询数据代码出现问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.043456 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved