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