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 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.
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. If 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