Enter事件
If e.Sender.Text = "请输入公司名称查找" Then
e.Sender.Text = ""
End If
Leave事件
If e.Sender.Text = "" Then
e.Sender.Text = "请输入公司名称查找"