Click Event

Previous  Next

---

Occurs when the user clicks on an item in the context menu object.

Syntax: Click

Use SelectedText or SelectedIndex to find the specific item that was clicked.

Example:

Sub App_Start

      Form1.Show

      FormLib1.New1("Form1",b4pobject(1))

      Context1.New1

      Context1.AddItem("Yes")

      Context1.AddItem("No")

      Context1.AddItem("-") 'Adds a separator

      Context1.AddItem("Maybe")

      FormLib1.AddContextMenu("TextBox1",Context1.Value)

End Sub

Sub Context1_Click

      Select Context1.SelectedText

            Case "Yes"

                  'Do something

            Case "No"

                  'Do something

            Case "Maybe"

                  'Do something

      End Select

End Sub