Description

Display the input dialog box with only OK button.

Syntax

object

Required. Object name, returned byDim idlg As InputDlg = New InputDlg.

Example

  Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    Dim tempParams As AdParams = New AdParams()

    If (FillAdParams(tempParams)) Then

      Dim dlg As New WinUI.InputDlg()

      dlg.SetOKOnly()

      dlg.Width = 500

      dlg.Title = My.Resources.IDS_Back4OptionsTitle

      dlg.AddInfo(My.Resources.IDS_Back4OptionsLabel, 1)

      dlg.AddInfo(tempParams.ToStringCodification(), 15)

 

      dlg.ShowDialog()

    End If

  End Sub