WinStudio
IWSApplication interface
Returns a string containing the name of the font family being used by the application user interface.
Application.GetBaseFontFaceName( )
Dim Value As String Value = Application.GetBaseFontFaceName() Application.ShowMessage("The base font being used on this system is " & Value & ".")