Vrátit poslední ID (IDENTITY) při vložení řádku VB.NET MySQL

Můžete použít dvojitý dotaz a použít funkci LAST_INSERT_ID() Po spuštění prvního dotazu získáte poslední aktuální dotaz:

Dim insert_coupon_query As String = ("INSERT INTO qa_discountcoupons (status_code) VALUES (5); SELECT LAST_INSERT_ID()")
                Dim cmd_query As New MySqlCommand(insert_coupon_query, objConn)
                Dim cmd_result As Integer = CInt(cmd_query.ExecuteScalar())

                MsgBox(cmd_result)