Public Shared Sub LockModules( _
   ByVal type As LockType, _
   ByVal appId As String _
) 

Dim type As LockType
Dim appId As String
 
MultimediaSupport.LockModules(type, appId)

public static void LockModules( 
   LockType type,
   string appId
)

public:
static void LockModules( 
   LockType type,
   String^ appId
) 

Public _result As Boolean = False
Public Sub MultimediaSupportExample()
       ' pszKey is a string containing the serial number. It is defined like this:
   ' Private pszKey As String = "MyString"
   Dim pszAppId As String = "My Test Application"

   Try
      ' unlock the multimedia feature
      Leadtools.Multimedia.Common.MultimediaSupport.UnlockModule(pszKey, Leadtools.Multimedia.Common.LockType.Application, pszAppId)
   Catch
      Exit Sub
   End Try

   ' [use the multimedia feature here]

   ' lock the multimedia feature before exiting the app
   Try
      Leadtools.Multimedia.Common.MultimediaSupport.LockModules(Leadtools.Multimedia.Common.LockType.Application, pszAppId)
      _result = True
   Catch e1 As Exception
      _result = False
   End Try
End Sub

public bool _result = false;
public void MultimediaSupportExample()
{
   // pszKey is a string containing the serial number. It is defined like this:
   // string pszKey = "MySerial";
   string pszAppId = "My Test Application";

   try
   {
      // unlock the multimedia feature
      Leadtools.Multimedia.Common.MultimediaSupport.UnlockModule(pszKey, Leadtools.Multimedia.Common.LockType.Application, pszAppId);
   }
   catch
   {
      return;
   }

   // [use the multimedia feature here]

   // lock the multimedia feature before exiting the app
   try
   {
      Leadtools.Multimedia.Common.MultimediaSupport.LockModules(Leadtools.Multimedia.Common.LockType.Application, pszAppId);
   }
   catch
   {
      return;
   }
   _result = true;
}