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


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.

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


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