InputBox Function
āĻāĻāĻāĻŋ āĻĄāĻžā§āĻžāϞāĻā§ āĻāĻāĻāĻŋ āĻĒā§āϰāĻŽāĻĒā§āĻ āĻĒā§āϰāĻĻāϰā§āĻļāύ āĻāϰ⧠āĻĨāĻžāĻā§ āϝā§āĻāĻžāύ⧠āĻŦā§āϝāĻŦāĻšāĻžāϰāĻāĻžāϰ⧠āϞā§āĻāĻžāϰ āĻāύāĻĒā§āĻ āĻĻāĻŋāϤ⧠āĻĒāĻžāϰā§āĨ¤ āĻāύāĻĒā§āĻāĻāĻŋ āĻāĻāĻāĻŋ āĻā§āϰāĻŋā§āĻŦāϞ⧠āĻŦāϰāĻžāĻĻā§āĻĻ āĻāϰāĻž āĻšā§āĨ¤
InputBox āĻšāϞ⧠āĻāĻāĻāĻŋ āĻĄāĻžā§āĻžāϞāĻā§āϰ āĻŽāĻžāϧā§āϝāĻŽā§ āϞā§āĻāĻž āϏāύā§āύāĻŋāĻŦā§āĻļ āĻāϰāĻžāύā§āϰ āϏā§āĻŦāĻŋāϧāĻžāĻāύāĻ āĻĒāĻĻā§āϧāϤāĻŋāĨ¤ OK āĻā§āϞāĻŋāĻ āĻāϰ⧠āĻ āĻĨāĻŦāĻž "āĻĢāĻŋāϰ⧠āϝāĻžāύ" āĻā§āĻĒā§ āĻāύāĻĒā§āĻ āύāĻŋāĻļā§āĻāĻŋāϤ āĻāϰāĻž āĻšā§āĨ¤ āĻĢāĻžāĻāĻļāύā§āϰ āĻŽāĻžāύ āĻĒā§āϰāĻĻāĻžāύ āĻšāϞ⧠āĻāύāĻĒā§āĻ āĻĒā§āϰāĻĻāĻžāύ āĻšā§āĨ¤ āĻāĻĒāύāĻŋ āϝāĻĻāĻŋ "āĻŦāĻžāϤāĻŋāϞ" āĻā§āĻĒā§ āĻĄāĻžā§āĻžāϞāĻāĻāĻŋ āĻŦāύā§āϧ āĻāϰā§āύ, āϤāĻžāĻšāϞ⧠InputBox āĻāĻāĻāĻŋ āĻļā§āύā§āϝ āĻĻā§āϰā§āĻā§āϝā§āϰ āϏā§āĻā§āϰāĻŋāĻ ("") āĻĒā§āϰāĻĻāĻžāύ āĻāϰāĻŦā§āĨ¤
āϏāĻŋāύāĻā§āϝāĻžāĻā§āϏ:
InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]])
āĻĒā§āϰāĻĻāĻžāύ āĻŽāĻžāύ:
āϏā§āĻā§āϰāĻŋāĻ
āĻĒā§āϝāĻžāϰāĻžāĻŽāĻŋāĻāĻžāϰ:
Msg: āĻĄāĻžā§āĻžāϞāĻ āĻŦāĻžāĻā§āϏ⧠āĻŦāĻžāϰā§āϤāĻž āĻšāĻŋāϏā§āĻŦā§ āϏā§āĻā§āϰāĻŋāĻ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āĻĒā§āϰāĻĻāϰā§āĻļāĻŋāϤ āĻšā§āĨ¤
āĻļāĻŋāϰā§āύāĻžāĻŽ: āĻĄāĻžā§āĻžāϞāĻ āĻŦāĻžāĻā§āϏā§āϰ āĻļāĻŋāϰā§āύāĻžāĻŽ āĻŦāĻžāϰ⧠āϏā§āĻā§āϰāĻŋāĻ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āĻĒā§āϰāĻĻāϰā§āĻļāĻŋāϤ āĻšā§āĨ¤
āĻĄāĻŋāĻĢāϞā§āĻ: āϝāĻĻāĻŋ āĻ āύā§āϝ āĻā§āύ āĻāύāĻĒā§āĻ āĻĒā§āϰāĻĻāĻžāύ āĻāϰāĻž āύāĻž āĻšā§ āϤāĻžāĻšāϞ⧠āϞā§āĻ āĻŦāĻžāĻā§āϏ⧠āĻĄāĻŋāĻĢāϞā§āĻ āĻšāĻŋāϏā§āĻŦā§ āϏā§āĻā§āϰāĻŋāĻ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āĻĒā§āϰāĻĻāϰā§āĻļāĻŋāϤ āĻšā§āĨ¤
y_pos: āĻāύāĻāĻŋāĻāĻžāϰ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āϝāĻž āĻĄāĻžā§āĻžāϞāĻā§āϰ āĻ āύā§āĻā§āĻŽāĻŋāĻ āĻ āĻŦāϏā§āĻĨāĻžāύ āϏā§āύāĻŋāϰā§āĻĻāĻŋāώā§āĻāĻāĻžāĻŦā§ āĻāϞā§āϞā§āĻ āĻāϰ⧠āĻĨāĻžāĻā§āĨ¤ āĻ āĻŦāϏā§āĻĨāĻžāύāĻāĻŋ āĻāĻāĻāĻŋ āϏāĻŽā§āĻĒā§āϰā§āĻŖ āĻ āĻā§āώ āĻāĻŦāĻ āĻ āĻĢāĻŋāϏ āĻ ā§āϝāĻžāĻĒā§āϞāĻŋāĻā§āĻļāύā§āϰ āĻāĻāύā§āĻĄā§ āύāĻŋāϰā§āĻĻā§āĻļ āĻāϰ⧠āύāĻžāĨ¤
y_pos: āĻāύāĻāĻŋāĻāĻžāϰ āĻāĻā§āϏāĻĒā§āϰā§āĻļāύ āϝāĻž āĻĄāĻžā§āĻžāϞāĻā§āϰ āĻāϞā§āϞāĻŽā§āĻŦ āĻ āĻŦāϏā§āĻĨāĻžāύ āϏā§āύāĻŋāϰā§āĻĻāĻŋāώā§āĻāĻāĻžāĻŦā§ āĻāϞā§āϞā§āĻ āĻāϰ⧠āĻĨāĻžāĻā§āĨ¤ āĻ āĻŦāϏā§āĻĨāĻžāύāĻāĻŋ āĻāĻāĻāĻŋ āϏāĻŽā§āĻĒā§āϰā§āĻŖ āĻ āĻā§āώ āĻāĻŦāĻ āĻ āĻĢāĻŋāϏ āĻ ā§āϝāĻžāĻĒā§āϞāĻŋāĻā§āĻļāύā§āϰ āĻāĻāύā§āĻĄā§ āύāĻŋāϰā§āĻĻā§āĻļ āĻāϰ⧠āύāĻžāĨ¤
x_pos āĻāĻŦāĻ y_pos āĻŦāĻžāĻĻ āĻĻā§āĻā§āĻž āĻšāϞā§, āĻĄāĻžā§āĻžāϞāĻāĻāĻŋ āĻĒāϰā§āĻĻāĻžāϰ āĻā§āύā§āĻĻā§āϰ⧠āĻĨāĻžāĻā§āĨ¤ āĻĄāĻžā§āĻžāϞāĻāĻāĻŋāϰ āĻ āĻŦāϏā§āĻĨāĻžāύ āĻā§āĻāĻĒ āĻ āĻāϞā§āϞā§āĻ āĻāϰāĻž āĻĨāĻžāĻā§āĨ¤
āĻāĻĻāĻžāĻšāϰāĻŖ:
Sub ExampleInputBox
Dim sText As String
sText = InputBox ("Please enter a phrase:","Dear User")
MsgBox ( sText , 64, "Confirmation of phrase")
End Sub