Foxtable(狐表)用户栏目专家坐堂 → 文本框设置了默认值,如果在没往这个文本框里输入字符的时候一直显示


  共有1842人关注过本帖树形打印复制链接

主题:文本框设置了默认值,如果在没往这个文本框里输入字符的时候一直显示

帅哥哟,离线,有人找我吗?
lovemaders
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:723 积分:5058 威望:0 精华:0 注册:2014/12/30 16:52:00
文本框设置了默认值,如果在没往这个文本框里输入字符的时候一直显示  发帖心情 Post By:2016/8/18 10:24:00 [只看该作者]

如图,我弄了一个文本框,文本框设置了默认字符,我想在点击录入字符的时候这个文本框为空,我在按下鼠标或者单击控件里面写了代码

 

 

   e.sender.text = ""

 

可以实现点击之后为空了。

问题一     但是我不知道这2个事件哪个更合适。

问题二     如何在  只要不是录入字符的状态的时候,其他状态下一直显示这个默认字符,我在mouseleave, leave, validating这3个事件都写了代码如下

 

Dim a As winform.textbox = e.Form.Controls("textbox05")
a.text = "输入公司名称查找" 

  依然实现不了问题二想要的结果。求个代码。


图片点击可在新窗口打开查看此主题相关图片如下:89.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/18 10:27:00 [只看该作者]

Enter事件

 

If e.Sender.Text = "请输入公司名称查找" Then

    e.Sender.Text = ""

End If

 

Leave事件

 

If e.Sender.Text = "" Then

    e.Sender.Text = "请输入公司名称查找"

End If


 回到顶部
帅哥哟,离线,有人找我吗?
13865161910
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:396 积分:3297 威望:0 精华:0 注册:2014/12/13 14:35:00
回复:(大红袍)Enter事件 If e.Sender.Tex...  发帖心情 Post By:2017/6/13 13:36:00 [只看该作者]

老师,这种方法,经过测试,在打开窗口的时候,需要点击一下控件,然后设置的默认内容才会显示!

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/6/13 14:13:00 [只看该作者]


 回到顶部