一、INPUTBOX 用法

1、用途：

用作输入窗口

2、语法：

InputBox (prompt， [ title ]， [ default ]， [ xpos ]， [ ypos ]， [ helpfile， context ])

例：InputBox  "请输入你正在学习的语言", "学习语言", "请输入学习语言"

二、INPUTBOX 用法扩展

和MsgBox、IF语句结合使用~

Sub language()
Dim 语言 As String
语言  = _
InPutBox( "请输入你正在学习的语言", "学习语言", "请输入学习语言")

If 语言  = "请输入学习语言" Then
MsgBox "你没有输入数据", vbExclamation
Else
Range("A3").Value = 语言  
MsgBox "欢迎进入" & 语言 & "世界!"  
End If
End Sub