Visual basic 通过 ODBC 读写数据库

Visual Studio Basic 2010 含有ODBC库文件，只需调用就可访问支持ODBC的各类数据库。

不废话，上程序

Imports System.Data.Odbc
Public Class To_ODBC
    Public Sub Open()
        Try
                Dim conn As New OdbcConnection
                conn.ConnectionString = “dsn=ODBC数据源管理器中定义的名称;UID=用户名;PWD=密码;”
                conn.Open()
                'RaiseEvent Status(" Connection State:" & conn.State.ToString, False)
                'RaiseEvent Status(" Database:" & conn.Database.ToString, False)
                'RaiseEvent Status(" Data Souse:" & conn.DataSource.ToString, False)
                conn.Close()
                conn.Dispose()
        Catch ex As OdbcException
            RaiseEvent Status("Error:" & ex.Message, True)
        Catch ex As Exception
            RaiseEvent Status("Error:" & ex.Mess