Select all, deselect and delete the list box for simple language selection.

Version 2

. Subroutine _ Button _ Delete _ Click

. Local variable circular variable, integer type.

Variable loop header (select list box 1. Number of terms (), 1,-1, cyclic variable).

If true (select the list box 1. Whether it is selected (loop variable-1))

Select the list box 1. Delete this item (loop variable-1).

If it's over.

. Variable cyclic tail ()

. Subroutine _ Button _ Deselect _ Click

. Local variable circular variable, integer type.

. Calculate the loop header (select the list box 1. Number of items (), loop variable)

Select the list box 1. Select the item (loop variable-1, invert (select list box 1. Whether it is selected (loop variable-1)).

. Count cycle tail ()