- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]如何实现这种功能 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=37984)
-- 发布时间：2013/7/17 0:22:00
-- [求助]如何实现这种功能
在窗口里,如图,
此主题相关图片如下：3.jpg
如何实现,在商品代码中填入商品编号,右边的商品信息中相应的变化,采用的是lable显示商品信息,这样比采用数据表样式好看,请高手指教
-- 发布时间：2013/7/17 1:15:00
--
行事件里加个find代码啊，然后控件的值等于find的
-- 发布时间：2013/7/17 9:09:00
--
编号文本框的textchanged事件中 利用FIND找到行然后为右边的LABEl赋值即可.
-- 发布时间：2013/7/17 9:40:00
--
find 用法我不是太会用,看帮助中的例子,全是静态的例子,我现在是在窗口中给商品编号赋值,是属于动态的,如何使用?请高手指点,谢谢
-- 发布时间：2013/7/17 9:48:00
--
http://www.foxtable.com/help/topics/0396.htm
-- 发布时间：2013/7/27 17:57:00
--
初次学编程,基础太差,哪位高手能写一段代码参考一下,谢谢各位大大了
-- 发布时间：2013/7/27 17:58:00
--
上个例子,三下五除二就能给你完成.
-- 发布时间：2013/7/27 21:59:00
--
Dim dr As DataRow
\'否则在产品表查找同名的产品行,将找到的行赋值给变量dr
dr = DataTables("产品信息").Find("[编号] = \' " & E.SENDER.TXTE &" \'")
If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing
label1.text = dr("单价")
End If
类似这样
-- 发布时间：2013/7/27 22:10:00
--
以下是引用夕然在2013-7-27 21:59:00的发言：
Dim dr As DataRow
\'否则在产品表查找同名的产品行,将找到的行赋值给变量dr
dr = DataTables("产品信息").Find("[编号] = \' " & E.SENDER.TXTE &" \'")
If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing
label1.text = dr("单价")
End If
类似这样
Dim dr As DataRow
\'否则在产品表查找同名的产品行,将找到的行赋值给变量dr
dr = DataTables("产品信息").Find("[编号] = \' " & E.SENDER.TXTE &" \'")
If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing
label1.text = dr("单价")
End If
类似这样
是啊，这个就是动态的。
帮助例子里全是动态的，静态的反而没有。