InputBox Function

         इसका use user से input लेने के लिए किया जाता है। इसमे एक dialog box display होता है जिसमे एक textbox होता है जिसमे डाटा input कर OK button पर क्लिक करते है। यह input की गई value को calling program को return कर देता है। इसमे एक textbox और दो button तथा एक message होता है।

Public Function InputBox(ByVal Prompt As String [,ByVal Title As String = ""] [ByVal DefaultResponse As String = ""] [,ByVal XPos As Integer = -1] [, ByVal YPos As Integer =-1]) As String

Arguments:

• Prompt: Required, string expression, इसका use input box मे display होने वाले message को define करने के लिए किया जाता है। इसकी maximum length 1024 character होती है।
• Title:  Optional, string expression , इसे input box के title bar मे title को define करने के लिए करते है।
• Default Response: optional, string expression: यह किसी भी प्रकार की value न देने पर default प्रयोग की जाती है। 
•  XPos: Optional, numerical expression : इसका प्रयोग input box की position define करने के लिए होती है। यह input box के left edge की दूरी screen से define करता है।
• YPos:  Optional, numerical expression : इसका प्रयोग input box की position define करने के लिए होती है। यह input box के Top edge की दूरी screen से define करता है।

Return Value: input box function input box के अंदर लिखे गए text को string form मे return करता है।

Ex-

         Dim s As String

        s = InputBox("Enter your name", "Input Box", "AMAN")

        MsgBox(s)