以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [讨论]自定义录入界面  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30542)

--  作者:anxue
--  发布时间:2013/3/29 19:40:00
--  [讨论]自定义录入界面


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


自定义录入界面,有时会出现这样呢,有时正常?

 

代码如下 

Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then \'如果下拉窗口已经打开
    Dim tbl As Table = Tables("窗口1_Table1")
    If drp.Text = "" Then \'如果内容为空
        tbl.Filter = "" \'显示所有客户
    Else \'否则根据输入内容进行模糊筛选
        Dim txt As String = "\'*" & drp.Text & "*\'"
        tbl.Filter = "教师姓名 like " & txt & " Or 性别 Like " & txt & " Or 课程名称 Like " & txt & " Or 职称 Like " & txt
    End If
End If


--  作者:paullqxp
--  发布时间:2013/3/29 20:24:00
--  
什么时候出现错误提示?
--  作者:anxue
--  发布时间:2013/3/29 20:29:00
--  

第一次录入信息时  ,直接输入一个数字 敲回车键 就出现这样,第二次输入信息就没什么事了,不知道什么原因?


--  作者:lsh767
--  发布时间:2013/3/29 20:31:00
--  很想了解
这个很有兴趣 想了解下
--  作者:anxue
--  发布时间:2013/3/29 20:42:00
--  

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

--  作者:anxue
--  发布时间:2013/3/30 10:47:00
--  


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130330104019.jpg
图片点击可在新窗口打开查看
第一次 打开窗口 在这个控件上 查询 教师姓名 小鱼

 出现下面这样

 


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

第二次 查询 教师姓名 小鱼 才正常

 


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

--  作者:狐狸爸爸
--  发布时间:2013/3/30 10:55:00
--  

按道理,不管第一次,还是第二次,只要是不行,就都应该不行。

这个问题有点奇怪,你要把你的文件发上来,或者做个例子发上来才行的哦。


--  作者:blackzhu
--  发布时间:2013/3/30 10:59:00
--  
会不会 下拉框的筛选 和 下拉窗口的表名不一致.
--  作者:anxue
--  发布时间:2013/3/30 13:30:00
--  

试了几次,大概检查出来了,也就是在窗口录入信息时,下拉窗口必须的打开一次才能录入信息。也就是说:第一次不能直接在窗口录入信息(或查询信息) 能不能加个代码,不用先打开下拉窗口,而直接在窗口查询。

我是按这个做的 二、设计录入窗口

 

Dim drp As WinForm.DropDownBox = e.sender
If drp.DroppedDown Then \'如果下拉窗口已经打开
    Dim tbl As Table = Tables("窗口1_Table1")
    If drp.Text = "" Then \'如果内容为空
        tbl.Filter = "" \'显示所有客户
    Else \'否则根据输入内容进行模糊筛选
        Dim txt As String = "\'*" & drp.Text & "*\'"
        tbl.Filter = "教师姓名 like " & txt & " Or 性别 Like " & txt & " Or 课程名称 Like " & txt & " Or 职称 Like " & txt
    End If
End If

 


--  作者:狐狸爸爸
--  发布时间:2013/3/30 14:55:00
--  

最好做个简单的例子发上来说话,否则我们也无从下手判断