vb一题如何做???

关于如何编写这个代码?
按”添加”按钮,出现一个对话框,提示”请输入****”,然后按确定,这时你所输入的内容将在一个listbox显示.
我已经想了一晚了,可还是没有答案,请高人指点.谢谢!的问题

Private Sub 添加_Click()
Dim strIpt As String
strIpt = InputBox(“请输入数据”)
List1.AddItem (strIpt)
End Sub
就是这样啊,同样的问题你都问了一遍了