Java script to VBA question

[egpicc]

Hello everybody! First, a brief background about my issue to make it possible to understand my question. I have been an SPSS Data Entry software user since 1995. It ran perfectly under Windows XP and Windows 7. A great program that would allow you to use JAVA scripts to skipping fields depending on the value of an entered data. Inasmuch the program does not run under Windows 10 or Windows 11, I decided to create surveys data entry using MS Access or Excel, but to be honest, I can´t find the equivalent command to accomplish the following JAVA script:

function Form1_Question2_SkipFill(thisRespObj, thisVar) // Generated by wizard
{
if ((Vars.P11.Value == 99))
{
Forms.Form1.Question4.SetFocus()
}
else
{
// by default focus will go to the next question
}
}

Which means If the value of the variable P11=99 skip to field named Question4 else go to next field by default, in the same form and record of course.

Can some please help me? Please take into account that I am user of different programs whose programming skills are no so developed, but willing to keep on learning.

 

[severynm]

Hi!

If the value is coming directly from a user input (textbox, etc), you might look at the .AfterUpdate event for controls to trigger the code. Otherwise, it can be as simple as

    If P11 = 99 Then
        SkipToObjectName.SetFocus
    Else
        NextQuestionObjectName.SetFocus
    End If

 

[egpicc]

Hi!

If the value is coming directly from a user input (textbox, etc), you might look at the .AfterUpdate event for controls to trigger the code. Otherwise, it can be as simple as

    If P11 = 99 Then
        SkipToObjectName.SetFocus
    Else
        NextQuestionObjectName.SetFocus
    End If

Thank you very much. I will try it and inform you.

 

[egpicc]

Thank you very much. I will try it and inform you.

Hi!

If the value is coming directly from a user input (textbox, etc), you might look at the .AfterUpdate event for controls to trigger the code. Otherwise, it can be as simple as

    If P11 = 99 Then
        SkipToObjectName.SetFocus
    Else
        NextQuestionObjectName.SetFocus
    End If

Thanks a lot, severynm! At the end what I did was to use the property .AfterUpdate in Access and created a macro in order to skip every time the value 99 is entered. Now, I can design any database regarding written questionnaires in Access and handle this type of code. In market research we use this value of 99 as the standard code for “Didn’t answer/Didn’t know” (DA/DK). This way we skip the rest of options of a multi response type of question. But to be honest, I miss the SPSS Data Entry program. Anyhow, it is never to late to keep on learning! ?