Visual Basic .Net MySQL 資料庫存取範例程式

● 宣告

Imports MySql.Data.MySqlClient
Public DBconn As MySqlConnection

● 連線

Dim connString As String = "Database=apex;Data Source=192.168.23.181;User Id=apex;Password=YLruqDAuX6d2;CharSet=utf8"

DBconn = New MySqlConnection(connString)
DBconn.Open()

● 新增

Dim cmd As New MySqlCommand

cmd.CommandText = "INSERT INTO table1 (qrcode) VALUES ('test')"
cmd.Connection = DBconn
cmd.ExecuteNonQuery()

● 查詢

Dim rd As MySqlDataReader
Dim cmd As New MySqlCommand

cmd.CommandText = "SELECT * FROM table1"
cmd.Connection = DBconn

rd = cmd.ExecuteReader()

rd.Read()
MsgBox(rd.Item("s_id"))