Private Sub Command1_Click()
Dim sr As String
sr = InputBox("输入你的生日", "sr", "1890-01-01")
MsgBox "您的生日是" & sr
End Sub

这个String在这里起什么作用？

我说同是论坛，怎么相差这么远呢，呵呵。。看看人家csdn的
[url]http://topic.[/url]

没别的意思，谢谢版主