Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口中DropBox设置模糊下拉之后,只能输入一个字符了


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

主题:[求助]窗口中DropBox设置模糊下拉之后,只能输入一个字符了

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


加好友 发短信
等级:婴狐 帖子:14 积分:173 威望:0 精华:0 注册:2019/3/6 20:36:00
[求助]窗口中DropBox设置模糊下拉之后,只能输入一个字符了  发帖心情 Post By:2019/3/7 16:50:00 [只看该作者]

各位大神,我是新手小白。在对照帮助中“自定义录入界面之四”做完之后,发现做了模糊下拉的DropBox控件只能输入一个字符了,不能连续输入,求大神们指教一下,我哪里做错了!
具体要实现的是:在主窗口的“症型”中输入拼音简码,动态生成列表框显示中文,然后选择后填入症型中。
现在的具体情况:根据“自定义录入界面之四”做好了相应的窗口“症型选择”,也设置好了DropBox1,但运行的时候只能在DropBox1中输入一个字符就不能再输入了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:中医处方系统.table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/7 16:58:00 [只看该作者]

dropdownopening事件代码改写到dropdownopened事件,即可

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


加好友 发短信
等级:婴狐 帖子:14 积分:173 威望:0 精华:0 注册:2019/3/6 20:36:00
  发帖心情 Post By:2019/3/7 17:50:00 [只看该作者]

谢谢,问题解决了!

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


加好友 发短信
等级:婴狐 帖子:14 积分:173 威望:0 精华:0 注册:2019/3/6 20:36:00
  发帖心情 Post By:2019/3/7 17:56:00 [只看该作者]

现在还有两个问题一直没解决,想请教一下。
请看新的附件。
想达到的效果:1、在“病史症状”中,既可以手动输入,又可以点击“症状选择”按钮连续输入,每点一个就在病史症状中添加一个。
                    2、在“药方详情”中,既可以手动选择添加药品,又可以通过在“处方”中选择,根据选择的处方在“药方详情”中添加药品信息。
现在的问题:1、第一个效果到现在没有思路该怎么实现,只是可以手动输入;
                 2、第二个效果现在实现了手动筛选添加药材的功能,但是通过在“处方”中选择,根据选择的处方在“药方详情”中添加药品信息的功能还实现不了,不知道该怎么做。这些在帮助文档里还没找到头绪。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:中医处方系统.table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/3/7 19:11:00 [只看该作者]

1、可以参考这里即可,如

 

http://www.foxtable.com/webhelp/scr/1534.htm

 

2、你的意思是,输入一个处方以后,添加到表格里面?你在textchanged或者valuechanged等事件处理不就可以了?

 


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


加好友 发短信
等级:婴狐 帖子:14 积分:173 威望:0 精华:0 注册:2019/3/6 20:36:00
  发帖心情 Post By:2019/3/8 12:42:00 [只看该作者]

是选择处方,然后在药方详情中显示处方对应的药品信息。如果不选择处方,可以直接在药品信息中选取药品

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/8 14:21:00 [只看该作者]

DropBox3,ValueChanged事件

Dim t As Table = e.Form.Controls("Table1").Table
t.DataTable.DataRows.Clear
For Each dr As DataRow In DataTables("处方配药").Select("处方名='" & e.Sender.Value & "'")
    Dim r As Row = t.AddNew
    r("药物") = dr("药物")
    r("数量") = dr("数量")
Next

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


加好友 发短信
等级:婴狐 帖子:14 积分:173 威望:0 精华:0 注册:2019/3/6 20:36:00
  发帖心情 Post By:2019/3/8 14:34:00 [只看该作者]

还是不太懂,不过很感谢老师们的指导!

 回到顶部