Example Code

Here is a peace of code to see how the controls are created and controlled.

For vA = 0 To 0
    Call Load(vForm.Check1(vA))
Next vA
XForm(BFormIndex).Check1(0).Caption = "Checkbox"
XForm(BFormIndex).Check1(0).Value = 1
Call XForm(BFormIndex).Check1(0).Move(340, 4, 77, 26)

Here is an other peace of code to see how some of the used functions are writen.

Select Case Name
    Case "Check1_Click()"
        Select Case XForm(BFormIndex).Check1(Index).Value
            Case 1
                XForm(BFormIndex).List1(0).Visible = True
            Case 0
                XForm(BFormIndex).List1(0).Visible = False
        End Select
End Select