Foxtable(狐表)用户栏目专家坐堂 → 请教


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

主题:请教

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


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
请教  发帖心情 Post By:2014/11/24 23:09:00 [显示全部帖子]

甜大师:好!请问下面的代码错在哪里?为何不对

Dim a As WinForm.Table = e.Form.Controls("Table1") 
Dim tb As Table
tb = a.Table

Dim va As WinForm.CheckedComboBox = e.Form.Controls("CheckedComboBox1")

Dim sz() As String
If va.Value.Contains(",")  Then
sz = va.Value.Split(",")

Else
sz = va.Value
End If


Dim Filter As String
For Each dc As String In sz
    If Filter > "" Then
        Filter = Filter & " or" & " 名称 like '*" & dc & "*'"
    End If
    Filter = "名称 like '*" & dc & "*'"
Next


tb.Filter = filter

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


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2014/11/24 23:21:00 [显示全部帖子]

For Each dc As String In sz
    If Filter > "" Then
        Filter = Filter & " or" & " 名称 like '*" & dc & "*'"
   else
    Filter = "名称 like '*" & dc & "*'"
 End If
Next

这样写一样吗?

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


加好友 发短信
等级:狐神 帖子:5061 积分:13092 威望:0 精华:0 注册:2014/5/15 21:34:00
  发帖心情 Post By:2014/11/24 23:36:00 [显示全部帖子]

请问以上代码为何不能写在 离开控件的事件里?在按钮就可以?


Leave

离开控件的后执行。

e参数属性:

Sender:返回触发事件的控件
Form:   返回控件所在的窗口


 回到顶部