ListBox Dialog Item Definition

Syntax:

ListBox X, Y, DX, DY, StrArray$( ), .Field[, Options]

Group:User Dialog

Description:
Define a listbox item.

Parameter Description

X This number value is the distance from the left edge of the dialog box. It is measured in 1/8 ths of the average character width for the dialog's font.

Y This number value is the distance from the top edge of the dialog box. It is measured in 1/12 ths of the character height for the dialog's font.

DX This number value is the width. It is measured in 1/8 ths of the average character width for the dialog's font.

DY This number value is the height. It is measured in 1/12 ths of the character height for the dialog's font.

StrArray$( ) This one-dimensional array of strings establishes the list of choices. All the non-null elements of the array are used.

Field The value of the list box is accessed via this field. It is the index of the StrArray$( ) var.

Options This numeric value controls the type of list box. Choose one value from following table. (If this numeric value omitted then zero is used.)

Option	Description
0	List is not sorted.
1	List is not sorted and horizontally scrollable
2	List is sorted.
3	List is sorted and horizontally scrollable.

 See Also:Begin Dialog, Dim As UserDialog.

Example:

Sub Main

  Dim lists$(3)

  lists$(0) = "List 0"

  lists$(1) = "List 1"

  lists$(2) = "List 2"

  lists$(3) = "List 3"

  Begin DialogUserDialog 200,120

  Text 10,10,180,15,"Please push the OK button"

  ListBox 10,25,180,60,lists$(),.list

  OKButton 80,90,40,20

  EndDialog

  Dim dlg As UserDialog
  dlg.list = 2
  Dialog dlg ' show dialog (wait for ok)
  Debug.Print dlg.list
EndSub