ASCII字符集值 8、9、10 和 13 分别转换为退格、制表、换行和回车字符
Chr(13)表示回车,Chr(10)表示换行
也可以用vbCrLf代替这两者的连用。
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
default就是你要设置的默认内容
详细参看MSDN
下面是MSDN上面的一个例子
Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3" ' 设置提示信息。
Title = "InputBox Demo" ' 设置标题。
Default = "1" ' 设置缺省值。
' 显示信息、标题及缺省值。
MyValue = InputBox(Message, Title, Default)
温馨提示:答案为网友推荐,仅供参考