Displaying registration status on a userform textbox


I am a new XLS PADLOCK user. I am currently developing a mini software on Excel for my customers and I will need some technical support:

I would like to send on a textbox within my vba userform, a text string: either “Trial Version” or “Registred Version” in order to show when opening the form its registration status.

I used the code here attached below, and compiled my workbook IN Trial MODE, but when I open the compiled and protected workbook, the textbox on the userform shows “Registred Version” instead of “Trial Version” and does not change even if I refresh the window.
I am using Excel 2016, (64 bit)

Your help will be greatly appreciated in solving this issue.

Here is the problematic code:

Public Function IsTrial()
Dim XLSPadlock As Object
On Error GoTo Err
Set XLSPadlock = Application.COMAddIns(“GXLSForm.GXLSFormula”).Object
IsTrial = XLSPadlock.PLEvalVar(“IsTrial”)
Exit Function
IsTrial = False
End Function

Private Sub UserForm_Activate()
EnableWindow FindWindowA(“XLMAIN”, Application.Caption), 1
Dim information As String
If IsTrial() Then
information = “Trial Version”
information = “Registred Version”
End If
TextBox1.Value = information
End Sub

Ok, this topic can be closed. I have finally found another alternative to accomplish the same result. Thanks anyway.