(ผู้รู้ตอบทีจ้า)จะทำ Query ใน VB.net แต่เชื่อม Database กับ MySQL อะครับ

sSQL="Select * From QueryCat"

using MySql.Data.MySqlClient; //เป็น Library ที่สำมะคัญ

        public static bool ExecuteNonQuery(string cmdStr)
        {

                MySqlConnection sigConn = new MySqlConnection("SERVER=localhost; UID=root; PASSWORD=password; DATABASE=MyDB;");
                MySqlCommand cmd = new MySqlCommand("INSERT INTO Cat(Name, Age) VALUES('memee','2');", sigConn);
                cmd.Connection.Open();
                if (cmd.ExecuteNonQuery() == 1) success = true;
                else success = false;
                cmd.Connection.Close();
                return success
        }

        public static DataSet ExecuteQuery(string queryStr)
        {
            DataSet ds = new DataSet();
 
                MySqlConnection sigConn = new MySqlConnection("SERVER=localhost; UID=root; PASSWORD=password; DATABASE=MyDB;");
                MySqlDataAdapter adapter = new MySqlDataAdapter("SELECT * FROM Cat ;", sigConn);
                sigConn.Open();
                adapter.Fill(ds);
                sigConn.Close();
                sigConn.Dispose();
                sigConn = null;
  
  
            return ds;
        }       

Dim ID As Integer = 0
        Dim sqlcmd As MySqlCommand ' define Mysql command
        Dim sqlcon As MySqlConnection = New MySqlConnection("SERVER=localhost; UID=root; PASSWORD=root; DATABASE=test;")
        sqlcon.Open() ' create Mysql connection
        sqlcmd = New MySqlCommand() ' create new Mysql command
        sqlcmd.Connection = sqlcon ' name Mysql command as connection
        sqlcmd.CommandText = "Select Max(id_member) from member"
        ID = sqlcmd.ExecuteScalar()
        If (ID > 0) Then
            ID = ID + 1
        Else
            ID = 1
        End If
        TextBox1.Text = ID
        sqlcon.Close()