ComboBox Dialog Item Definition
Syntax:
ComboBox X, Y, DX, DY, StrArray$(
), .Field$
Group:
User Dialog
Description:
Define a combobox item. Combo boxes combine the functionality of an edit
box and a list box.
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 combo box is accessed via this field. This is the text
in the edit box.
See
Also: Begin Dialog, Dim
As UserDialog.
Example:
Sub Main
Dim combos$(3)
combos$(0) = "Combo 0"
combos$(1) = "Combo 1"
combos$(2) = "Combo 2"
combos$(3) = "Combo 3"
Begin Dialog UserDialog
200,120
Text 10,10,180,15,"Please push the OK button"
ComboBox 10,25,180,60,combos$(),.combo$
OKButton 80,90,40,20
End Dialog
Dim dlg As UserDialog
dlg.combo$ = "none"
Dialog dlg ' show dialog (wait for ok)
Debug.Print dlg.combo$
End Sub
