Foxtable(狐表)用户栏目专家坐堂 → 关于调用e参数


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

主题:关于调用e参数

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


加好友 发短信
等级:四尾狐 帖子:821 积分:6256 威望:0 精华:0 注册:2016/7/8 18:58:00
关于调用e参数  发帖心情 Post By:2016/7/27 13:57:00 [只看该作者]

Dim cbx As WinForm.ComboBox = e.Form.Controls("ComboBox1")
'Functions.Execute("调用e",cbx,cbx.basecontrol.Validating)

一 除了用AddHandler ,如何在其它地方调用 Validating事件的e参数,

二 用第三方控件指定事件过程,可以调用,但是无法引用sender的一些属性,比如complist
AddHandler cbx.basecontrol.Validating, AddressOf Combobox_Validating '绑定事件

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:绑定函数.table


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


加好友 发短信
等级:四尾狐 帖子:821 积分:6256 威望:0 精华:0 注册:2016/7/8 18:58:00
  发帖心情 Post By:2016/7/27 15:04:00 [只看该作者]

up

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


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

1、不能,只有触发事件才能有e参数;

 

2、控件.BaseControl的对象的属性和方法和foxtable介绍的不同。基本上,要去搜索msdn

 

https://msdn.microsoft.com/zh-cn/library/system.windows.forms.combobox.aspx

 


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


加好友 发短信
等级:四尾狐 帖子:821 积分:6256 威望:0 精华:0 注册:2016/7/8 18:58:00
  发帖心情 Post By:2016/7/27 15:36:00 [只看该作者]

自定义事件绑定的是WinForm.ComboBox   的 basecontrol 的事件,自定义事件中传递的是basecontrol ,无法通过函数获取WinForm.ComboBox 的属性 ,这条路行不通。

有没有其它方法?

 

''输入控件离开前,判断是否是下拉列内的内容
Public Sub Combobox_Validating(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs)
   Functions.Execute("调用e",sender,e)  '离开控件前
End Sub


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


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


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


加好友 发短信
等级:四尾狐 帖子:821 积分:6256 威望:0 精华:0 注册:2016/7/8 18:58:00
  发帖心情 Post By:2016/7/27 16:41:00 [只看该作者]

类型总是设置不正确,例子上传了,大红袍老师帮忙调整一下

 


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

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


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

哦,改了类型了。改一下代码

 

Dim cbx As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim bcbx = cbx.basecontrol


If array.Indexof(bcbx.Lines, bcbx.Text) >= 0 Then
    msgbox("存在")
Else
    msgbox("不包含")
End If


 回到顶部