9.0

221
PushButton Dialog Item Definition
Syntax
PushButton X, Y, DX, DY, Title$[, .Field]
Group
User Dialog
Description
Define a push button item. Pressing the push button updates the dlgvar field values and closes the dialog.
(Dialog
( ) function call returns the push button's ordinal number in the dialog. The first push button returns 1.)
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 height. It is measured in 1/12ths of the character hei
g
ht fo
r
the dialog's font.
Title$ The value of this string is the title of the push button control.
Field This identifier is the name of the field. The dialogfunc receives this name as string. I
f
this identifer is omitted then the first two words of the title are used.
See Also: Begin Dialog, Dim As UserDialog.
Example
Sub Main
Begin Dialog
UserDialog 200,120
Text
10,10,180,30,"Please push the DoIt button"
OKButton
40,90,40,20
PushButton 110,90,60,20,"&Do
It"
End
Dialog
Dim
dlg As UserDialog
Debug
.Print Dialog(dlg)
End
Sub
Put Instruction
Syntax
Put StreamNum, [RecordNum], var
Group
File