Vb.net Mysql在一个数据中执行多个查询

Imports MySql.Data.MySqlClient

Public Sub ExecuteMultipleQueries()
    Dim connectionString As String = "server=数据库地址;user id=用户名;password=密码;database=数据库名;"
    Dim connection As MySqlConnection = New MySqlConnection(connectionString)
    connection.Open()

    Dim query1 As String = "SELECT * FROM table1;"
    Dim query2 As String = "SELECT * FROM table2;"

    Dim command1 As MySqlCommand = New MySqlCommand(query1, connection)
    Dim reader1 As MySqlDataReader = command1.ExecuteReader()
    ' 处理第一个查询结果

    Dim command2 As MySqlCommand = New MySqlCommand(query2, connection)
    Dim reader2 As MySqlDataReader = command2.ExecuteReader()
    ' 处理第二个查询结果

    reader1.Close()
    reader2.Close()
    connection.Close()
End Sub