ComboBox Dialog Item Definition
Syntax
ComboBox X, Y, DX, DY, StrArray$( ), .Field$[, Options]
Group
User Dialog
Description
Define a combobox item.
Combo boxes combine the functionality of an edit box and a list box.
Parameters
|
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 by way of this field.
This is the text in the edit box.
|
Options
|
This numeric value controls the type of combo box.
Choose one value from following table.
(If this numeric value omitted then zero is used.)
|
Option
|
Description
|
0
|
List is not sorted.
|
2
|
List is sorted.
|
See Also
Begin Dialog
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