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