Sets the text shown in the Progress View dialog.

Syntax:

 
SetInfoText(NewInfoText as String)
Parameters: New info text.
Example: 
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds&)

Sub UseProgressBar()
    Dim Progress As ProgressView
    Dim i As Integer
    
    Set Progress = Application.Windows.ProgressView
    
    Call Progress.Start
    Call Progress.ShowCancelButton(True)
    Call Progress.SetInfoText("This is a test of the progress view.")
    Call Progress.SetTitle("Test")
    
    For i = 0 To 100
        Call Progress.SetProgress(100, i)
        Call Sleep(50)
        If (Progress.IsCanceled) Then
            Exit For
        End If
    Next i
    
    Call Progress.End

End Sub
Remarks: The default text is "Please wait!". The text can only be changed if the dialog is made visible with the "Start()" method.

See also:

Class ProgressView

Last Updated: 04/26/05