Function call only works when MessageBox.Show() is included?

by

The PlayStateChanged event is quite notorious. It was really meant to just update a UI element that shows the state. Doing anything with the player in that event is very troublesome. A call to MessagBox can have an affect because it pumps a message loop, always a big deal for ActiveX controls.

The best way to stay out of trouble is by delaying your code, making it run after the event was fired and the player is back into a quiescent state. Elegantly done by using the Control.BeginInvoke() method. Like this:

Private Sub AxWindowsMediaPlayer1_PlayStateChange(ByVal sender As System.Object, ByVal e As AxWMPLib._WMPOCXEvents_PlayStateChangeEvent) Handles AxWindowsMediaPlayer1.PlayStateChange
    If e.newState = WMPLib.WMPPlayState.wmppsStopped Then
        Me.BeginInvoke(New Action(AddressOf NextSong))
    End If
End Sub

Private Sub NextSong()
    musictimer("next")
End Sub

More Related Contents:

  1. How to use a string variable in a directory path
  2. Drawing Textbox at runtime in VB.net and indexing
  3. How to set variable to a huge number
  4. How can i make my own command to my first console application in VB.NET? [closed]
  5. What is the difference between And and AndAlso in VB.NET?
  6. How can I run code in a background thread and still access the UI?
  7. How to programmatically add controls to a form in VB.NET
  8. SQLite not storing decimals correctly
  9. draw outline for some connected lines
  10. Declare global variables in Visual Studio 2010 and VB.NET
  11. Dynamic button click event handler
  12. Installshield Custom Dialogue Installer
  13. Option Strict on by default in VB.NET
  14. Clickable URL in a Winform Message Box?
  15. Doing math in vb.net like Eval in javascript
  16. Casting DataTypes with DirectCast, CType, TryCast
  17. What is the use of a shared variable in VB.NET?
  18. How do I prevent a form from being resized by the user?
  19. VB.NET Function Return
  20. Saving ListBox with Additional information in My.settings
  21. Using colons to put two statements on the same line in Visual Basic [closed]
  22. Why is it not necessary to indicate ByVal/ByRef anymore?
  23. Serilog – Output/Enrich All Messages with MethodName from which log entry was Called
  24. Get the output of a shell Command in VB.net
  25. How to Generate Combinations of Elements of a List in .NET 4.0
  26. How to run DOS/CMD/Command Prompt commands from VB.NET?
  27. How to access the object itself in With … End With
  28. How to perform .Onkey Event in an Excel Add-In created with Visual Studio 2010?
  29. VB6 to VB.net conversion [closed]
  30. How to call the Magento API from VB.NET

Leave a Comment