The following example uses the InputBox function to display an input box and

Option Explicit

Dim

sPrompt, sTitle, sHelpFile, sRes

Dim

vDef

Dim

sPrompt =

vDef = "

nXPos =

nYPos, nXPos, nContext"Where do you live?" : sTitle = "Personal Data"Israel"100 : nYPos = 100 : nContext = 1001

sHelpFile = "

sRes = C:\WINDOWS\system32\winhelp.hlp"InputBox(sPrompt, sTitle, vDef, nXPos, nYPos, sHelpFile, nContext)