RC-WinTrans Object Model Help |
Application.OnChangeActiveSourceLanguage |
Event fired if the active source language has changed.
Syntax: |
OnChangeActiveSourceLanguage(Project As TranslationProject, NewActiveSourceLanguageCode As String) |
Parameters: |
Project Project for which the active source language has changed. NewActiveSourceLanguageCode Language code of the new active source language.
|
Example: | ' in a class module "EventClass" Dim WithEvents App As Application Private Sub App_OnChangeActiveSourceLanguage(ByVal Project As TranslationProject, _ ByVal NewActiveSourceLanguageCode As String) [...] End Sub ' in a module Public EventManager As New EventClass Sub TestMacro() Set EventManager.App = Application End Sub |
See also: