vb.net 連接mysql範例程式

vbnetmysql

VB.NET連接MYSQL 的範例程式GOOGLE實在頗亂的.. 只好自己摸一摸來寫一篇看會不會比較好懂一點

VB.NET要連接MYSQL 你要必須安裝 MySql.Data 外掛

之後你可以創一個專案，然後如下圖顯示來加入參考

然後瀏覽你的MYSQL.DATA.DLL的路徑位置，後確定。像是我的話就會是下圖的路徑這樣。

這樣就完成了最重要的一關拉。剩下就是程式碼的複製貼上了

首先我的FORM長這樣。上面隨便擺一個Button 下面擺一個DataGridView

Imports MySql.Data.MySqlClient

Public Class Form1
    Public KDBconn As New MySqlConnection
    Public KDBconnBackUp As New MySqlConnection
    Public KDBconnLib As New MySqlConnection
    Public Sub GetKDBConn()
        Dim connString As String = "Database=test;Data Source=127.0.0.1;User Id=root;Password=0000;CharSet=utf8"
        Dim tmpSql As String
        If KDBconn.State = ConnectionState.Open Then KDBconn.Close() '若第二次重複連線需關閉
        KDBconn = New MySqlConnection(connString)
        KDBconn.Open()

        If KDBconn Is Nothing Then
            If connString = "" Then
                MsgBox("未設定連線字串" & connString)
            Else
                KDBconn = New MySqlConnection(connString)
                KDBconn.Open() '"正常連結資料庫"
                MsgBox("ok")
            End If
        Else
        End If
        If KDBconn Is Nothing Then MsgBox("MYSQL資料庫連線失敗")
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim SQL_Statement As String
        Dim cmd As MySqlCommand
        Dim da As New MySqlDataAdapter
        Dim ds As New DataSet
        GetKDBConn()
        Dim str1 As String = "select * from country"

        Dim adp1 As MySqlDataAdapter = New MySqlDataAdapter(str1, KDBconn)

        '將查詢結果放到記憶體set1上的"1a "表格內

        Dim set1 As DataSet = New DataSet

        adp1.Fill(set1, "1a")

        '將記憶體的資料集合存放到視窗畫面上的DataGrid上

        DataGridView1.DataSource = set1.Tables("1a")

        '關閉資料庫的連結

        KDBconn.Close()

    End Sub
End Class

程式碼部分就上面這些

當然你可以在裡面看到我的mysql是放在本機的(127.0.0.1)然後有一個資料庫叫做test 帳密為root 0000 裡面有一個資料表叫做
country

他會把撈到的資料全部放到DataGridView 上面去
如上圖所示，整個程式碼範例我丟到我的github vb.net 連接mysql的範例程式