VB2008.NET DataGrid相关总结1
1。DataGrid是VB6.0里的。如果VB2008中要用必须先添加ActiveX控件。
在VB.net中右键工具箱,选择
2.连接数据库代码
Access数据库
Public Class Form1
Inherits System.Windows.Forms.Form
Dim Con As New ADODB.Connection()
Dim Rec As New ADODB.Recordset()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Con.ConnectionString = "Dbq=" & Application.StartupPath & "/Test.mdb;Driver={Microsoft Access Driver (*.mdb)}"
Con.Open()
Rec.CursorType = 1
Rec.LockType = 3
Rec.ActiveConnection = Con
Rec.Open("Student") '("Select * From Student", Con)
AxDataGrid1.DataSource = Rec
AxDataGrid1.Refresh()
End Sub
Private Sub Form1_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Leave
Rec.Close()
Con.Close()
Rec = Nothing
Con = Nothing
End Sub
End Class
3.运行程序后