Sub OnStartup
  Script.RegisterEvent SDB, "OnPlay", "Update2"
End Sub 

Sub Update2
 
  Dim lyrics
  lyrics = SDB.Player.CurrentSong.lyrics

  Call SDB.MessageBox( "Load 1 may Show Truncated lyrics ending with '...':" & Chr(10) & Chr(10) & lyrics, 2, Array(4))

  lyrics = SDB.Player.CurrentSong.lyrics

  Call SDB.MessageBox( "Load 2 Show Complete Lyrics:"  & Chr(10) & Chr(10) & lyrics, 2, Array(4))
End Sub