FactoryTalk View 6.1 SE VBA Use

I am trying to convert my RSView 32 project into FactoryTalk View 6.1 SE. I have converted everything but left the VB until last. I have my code in where it needs to be but I cannot execute it. I used to use the VBAExec function in RSView but that is not in FT 6.1. I have listed my code below, just trying to call the subroutine NumericDisplay2Change. Is there any ideas out there on how to do it? I place this code in VB and use a push button to call a macro, which in turn calls the VB. Thanks in advance!

[FONT=&quot]Private Sub NumericDisplay2Change()[/FONT]
[FONT=&quot]On Error GoTo ErrorHandler[/FONT]
[FONT=&quot]If Not IsError(NumericDisplay2.Value) Then[/FONT]
[FONT=&quot]If NumericDisplay2.Value = 1 Then[/FONT]
[FONT=&quot] ExecuteCommand "&Set TEST_1 9"[/FONT]
[FONT=&quot] End If[/FONT]
[FONT=&quot] End If[/FONT]
[FONT=&quot] Exit Sub[/FONT]
[FONT=&quot]ErrorHandler:[/FONT]
[FONT=&quot] LogDiagnosticsMessage Err.Description, ftDiagSeverityError[/FONT]
[FONT=&quot]End Sub[/FONT]