9.0

196
User Dialog
Description
Define a listbox item.
Parameter Description
X This number value is the distance from the left ed
g
e of the dialo
g
box. It is measured
in 1/8ths of the average character width for the dialog's font.
Y This number value is the distance from the to
p
ed
g
e of the dialo
g
box. It is measured
in 1/12ths of the character height for the dialog's font.
DX This number value is the width. It is measured in 1/8ths of the average character
width for the dialog's font.
DY This number value is the hei
g
ht. It is measured in 1/12ths of the character hei
g
ht fo
r
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 StrArra
y
$
(
)
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.)
Parameter Description
0 List is not sorted.
2 List is sorted.
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 Dialog
UserDialog 200,120
Text
10,10,180,15,"Please push the OK button"
ListBox 10,25,180,60,lists$(),.list
OKButton
80,90,40,20
End
Dialog
Dim
dlg As UserDialog
dlg.list = 2
Dialog
dlg ' show dialog (wait for ok)
Debug
.Print dlg.list
End
Sub
Little-endian definition
Multiple byte data values (not strings) are stored with the lowest order byte first. For example, the long integer
&H01020304 is stored as this sequence of four bytes: &H04, &H03, &H02 and &H01. A Binary or Random file
written using Put
uses little-endian format so that it can be read using Get on any machine. (Big-endian machines,
like the Power-PC, reverse the bytes as they are read by Get
or written by Put.)