Syntax

Msg.Text [= newtext$]

Description

Changes the text within an open message dialog box (one that was previously opened with the Msg.Open method).

Comments

The message dialog box is not resized to accommodate the new text.

A runtime error will result if a message dialog box is not currently open (using Msg.Open).

Example

This example creates a modeless message box, leaving room in the message text for the record number. This box contains a Cancel button.

Sub Main()

  Msg.Open "Reading Record",0,True,False

  For i = 1 To 100

    'Read a record here.

    'Update the modeless message box.

    Sleep 100

    Msg.Text ="Reading record " & i

  Next i

  Msg.Close

End Sub

See Also

Msg.Close (method); Msg.Open (method); Msg.Thermometer (property).

M