#VB code example
DataToEncode = InputString.Text
Dim DMFontEncoder As DMATRIXLib.Datamatrix
Set DMFontEncoder = New Datamatrix
DMFontEncoder.FontEncode DataToEncode, 0, 0, 0, Printable_string
PrintableBarcodeString = Printable_string


##</code><code>##

use Win32::API;

my $DataToEncode = "Test1 Test2 Test3";

use Win32::API;
  $function = Win32::API->new(
      'IDAutomationDMATRIX6.DLL', 'FontEncode',
  );
  $function->Call($DataToEncode);