VB.NET调用MySQL存储过程并获得返回值的方法

Dim myConnectionString As String = "Database=" & myDatabase & _
 " ;Data Source=" & myHost & _
 ";User Id=" & myUserId & ";Password=" & myPassword
Dim myConnection As New MySqlConnection(myConnectionString)
Try
 myConnection.Open()
Catch MyException As MySqlException
 Console.WriteLine("Connection error: MySQL code: " & MyException.Number & _
 " " + MyException.Message)
End Try
Try
 Dim myCommand As New MySqlCommand("call error_test_proc(1)")
 myCommand.Connection = myConnection
 myCommand.ExecuteNonQuery()
Catch MyException As MySqlException
 Console.WriteLine("Stored procedure error: MySQL code: " & _
 MyException.Number & " " & _
 MyException.Message)
End Try