[2004-8-4]VB.Net学习笔记,使用ADO.Net对象访问数据库,将结果写入ListView

原创 2004年08月04日 14:51:00

Public Class Form1
??? Inherits System.Windows.Forms.Form

#Region " Windows 窗体设计器生成的代码 "

??? Public Sub New()
??????? MyBase.New()

??????? '该调用是 Windows 窗体设计器所必需的。
??????? InitializeComponent()

??????? '在 InitializeComponent() 调用之后添加任何初始化

??? End Sub

??? '窗体重写处置以清理组件列表。
??? Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
??????? If disposing Then
??????????? If Not (components Is Nothing) Then
??????????????? components.Dispose()
??????????? End If
??????? End If
??????? MyBase.Dispose(disposing)
??? End Sub

??? 'Windows 窗体设计器所必需的
??? Private components As System.ComponentModel.IContainer

??? '注意:以下过程是 Windows 窗体设计器所必需的
??? '可以使用 Windows 窗体设计器修改此过程。
??? '不要使用代码编辑器修改它。
??? Friend WithEvents Button1 As System.Windows.Forms.Button
??? Friend WithEvents OleDbConnection1 As System.Data.OleDb.OleDbConnection
??? Friend WithEvents OleDbCommand1 As System.Data.OleDb.OleDbCommand
??? Friend WithEvents ListView1 As System.Windows.Forms.ListView

??? Private Sub InitializeComponent()
??????? Me.Button1 = New System.Windows.Forms.Button()
??????? Me.OleDbConnection1 = New System.Data.OleDb.OleDbConnection()
??????? Me.OleDbCommand1 = New System.Data.OleDb.OleDbCommand()
??????? Me.ListView1 = New System.Windows.Forms.ListView()
??????? Me.SuspendLayout()
??????? '
??????? 'Button1
??????? '
??????? Me.Button1.Location = New System.Drawing.Point(296, 256)
??????? Me.Button1.Name = "Button1"
??????? Me.Button1.Size = New System.Drawing.Size(80, 24)
??????? Me.Button1.TabIndex = 1
??????? Me.Button1.Text = "读取(&R)"
??????? '
??????? 'ListView1
??????? '
??????? Me.ListView1.Location = New System.Drawing.Point(8, 8)
??????? Me.ListView1.Name = "ListView1"
??????? Me.ListView1.Size = New System.Drawing.Size(384, 224)
??????? Me.ListView1.TabIndex = 2
??????? '
??????? 'Form1
??????? '
??????? Me.AutoScaleBaseSize = New System.Drawing.Size(6, 14)
??????? Me.ClientSize = New System.Drawing.Size(408, 293)
??????? Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.ListView1, Me.Button1})
??????? Me.Name = "Form1"
??????? Me.Text = "Form1"
??????? Me.ResumeLayout(False)

??? End Sub

#End Region

??? '以上都不用看,是Vs.Net生成的,下面是我写的代码
??? Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
??????? Dim DataReader As System.Data.OleDb.OleDbDataReader?????? '定义DataReader对象
??????? Dim i, j, FieldCount As Integer
??????? Dim TempItem As ListViewItem????????????????????????????????????? '定义临时ListViewItem对象
??????? OleDbConnection1.ConnectionString = "Provider=Microsoft.Jet.Oledb.4.0;Data Source=D:/Inetpub/wwwroot/MYDB.MDB"???????????????????????????'设置连接字符串
??????? OleDbConnection1.Open()
??????? OleDbCommand1.CommandText = "Select * from mytable"??????? '设置命令字符串
??????? OleDbCommand1.Connection = OleDbConnection1
??????? DataReader = OleDbCommand1.ExecuteReader??????????? '执行SQL语句,返回给DataReader对象
??????? FieldCount = DataReader.FieldCount
??????? ListView1.FullRowSelect = True
??????? ListView1.CheckBoxes = True
??????? For i = 0 To FieldCount - 1???????????????????????????'枚举DataReader中字段名,添加Columns
??????????? ListView1.View = View.Details
??????????? ListView1.Columns.Add(DataReader.GetName(i), 80, HorizontalAlignment.Left)
??????? Next
??????? While DataReader.Read()??????????????????????????? '获取记录信息,写入ListView
??????????? TempItem = ListView1.Items.Add(DataReader.GetValue(0))
??????????? For j = 1 To FieldCount - 1
??????????????? TempItem.SubItems.Add(DataReader.GetValue(j) & "")
??????????? Next
??????? End While
??????? DataReader.Close()
??????? OleDbConnection1.Close()
??? End Sub
End Class

VB.net数据库编程(08):ADO.net数据访问接口

编程语言与数据库的连接是通过一个接口,达到两者交流,以便两者谈情说爱。 一、接口种类:6种:         1、ODBC,面向C/C++。         2、DAO,   面向VB,操作AC...
  • dzweather
  • dzweather
  • 2013年02月02日 20:18
  • 19796

C# ADO.NET的五个常用对象及数据库连接操作

C#中和数据库连接的操作时开发中必不可少的,而ADO.NET就是其中的关键技术之一。常见的ADO.NET有五个常用的对象: SqlConnection 数据库连接对象 SqlCommand 数据...
  • ZorroBubble
  • ZorroBubble
  • 2013年06月13日 09:56
  • 2600

java学习笔记之IO流总结(一)

输入输出作为所有程序都必需的部分   对于我们的java学习有特别重要的意义,以至于博主辛苦看了三天的流分布,跟大家分享一下 一.首先我们说一下io流的概念 流是一组有顺序的,有起点和终点的字节集...
  • qq_24235325
  • qq_24235325
  • 2016年10月14日 20:36
  • 1267

最容易学的ADO.NET常用对象详解(头发乱了的学习笔记 - 博客园--转载)

  • 2008年07月02日 09:29
  • 547KB
  • 下载

黑马程序员之ADO.NET学习笔记:IP地址归属地查询。查询结果:北京移动[海淀]。

//IP地址归属地查询。查询结果:北京移动[海淀]。 //先把数据文件解压到硬盘上,然后写程序进行数据导入:扫描解压的目录下所有的txt文件,然后依次读取每个文件,注意用上文件名,表三列:起始号码,结...
  • xutingzhou
  • xutingzhou
  • 2012年09月06日 08:46
  • 1825

ADO.NET之4-使用SqlCommand对象向数据库添加记录---ShinePans

源代码: using System; using System.Collections.Generic; using System.Data; using System.Data.SqlCl...
  • panshang1994
  • panshang1994
  • 2014年08月02日 13:46
  • 1663

ADO.NET Entity Framework学习笔记(3)ObjectContext对象[转]

说明  ObjectContext提供了管理数据的功能  Context操作数据   AddObject 添加实体 将实体添加到集合中, 创建实体时,状态为EntityState.Detached 当...
  • ligongruangao
  • ligongruangao
  • 2011年05月25日 20:29
  • 2821

黑马程序员之ADO.NET学习笔记:SqlCommand(命令对象)

1.实例化的时候默认初始化的四个属性 2.创建命令对象   使用连接对象的“CreateCommand()”方法创建命令对象,也可以使用new来实例化对象!   SqlCommand comma...
  • xutingzhou
  • xutingzhou
  • 2012年09月07日 09:32
  • 247

黑马程序员_学习日记47_615数据库开发及ADO.Net(连接字符串、SqlDataReader对象、连接池)

重难点:reader.NextResult()、反射揭示连接池原理、连接字符串写法   一、日期函数: 1、getdate() 获得当前日期 2、Dateadd(datepart,numbe...
  • kuangjian007
  • kuangjian007
  • 2012年06月17日 17:17
  • 407

ADO.NET 使用Connection对象连接数据库实现用户登录

今天想总结一下上周老师讲的用Connection对象连接字符串实现登录的demo。 也想将代码熟悉一下。 首先在sql server中建好表,我只设置了两个字段 :usrName和psd。接下来在...
  • Jiojio_
  • Jiojio_
  • 2017年03月04日 17:34
  • 219
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:[2004-8-4]VB.Net学习笔记,使用ADO.Net对象访问数据库,将结果写入ListView
举报原因:
原因补充:

(最多只允许输入30个字)