There is a function called InputBox that works in the same way as the one in
VB6:
Public Function InputBox(ByVal Prompt As String, Optional ByVal Title As
String = "", Optional ByVal DefaultResponse As String = "", Optional ByVal
XPos As Integer = -1, Optional ByVal YPos As Integer = -1) As String