Foxtable(狐表)用户栏目专家坐堂 → 空值不展开下拉


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

主题:空值不展开下拉

美女呀,离线,留言给我吧!
联友
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:300 积分:2565 威望:0 精华:0 注册:2013/5/23 9:49:00
空值不展开下拉  发帖心情 Post By:2015/10/22 10:52:00 [只看该作者]

如果DropBox1为空时,点击下拉按钮不展开。请指点,谢谢

 

这个代码没作用

If e.Form.Controls("DropBox1").Value IsNot Nothing Then

   e.Form.Controls("DropBox1").CloseDropDown()

End If

[此贴子已经被作者于2015/10/22 11:13:14编辑过]

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


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

Enter事件、TextChanged事件

 

e.Sender.ShowDropDownButton = not (e.Sender.Text = Nothing)


 回到顶部
美女呀,离线,留言给我吧!
联友
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:300 积分:2565 威望:0 精华:0 注册:2013/5/23 9:49:00
  发帖心情 Post By:2015/10/23 9:28:00 [只看该作者]

DropDownBox1是空值时禁止展开

If e.Form.Controls("DropDownBox1").Value IsNot Nothing Then

   e.Form.Controls("DropDownBox1").OpenDropDown  ‘不是空值展开

Else

e.Form.Controls("DropDownBox1").DroppedDown   ’‘是空值不展开

 

End If

请指点错在哪里?谢谢


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


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

不能这样做。只有2楼的方法。

 回到顶部
美女呀,离线,留言给我吧!
联友
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:300 积分:2565 威望:0 精华:0 注册:2013/5/23 9:49:00
  发帖心情 Post By:2015/10/23 9:38:00 [只看该作者]

好的,谢谢

 回到顶部