主题：请问怎么做出这样的效果？

 enter事件

If e.Sender.text = Nothing OrElse e.Sender.Text = "请输入名称" Then
    e.Sender.text = ""
End If
e.Sender.ForeColor = Color.black

 leav事件

If e.Sender.Text = Nothing Then
    e.Sender.ForeColor = Color.Gray
    e.Sender.text = "请输入名称"
End If