以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助 一个控件值改变后,另一个控件的值自动从表中提取  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=8256)

--  作者:卟离卟弃
--  发布时间:2010/9/24 16:35:00
--  求助 一个控件值改变后,另一个控件的值自动从表中提取

各位老师; 我在 生产任务单号 控件的 ValueChanged 事件中写下如下代码

 

Dim cmb As WinForm.TextBox = e.Sender
Dim str As String = e.Form.Controls("生产任务单号").Value
Dim aa,bb As String
aa = DataTables("SNT业务定单").GetComboListString("产品型号", "生产任务单号 = \'" & str & "\'")
bb = DataTables("业务定单").GetComboListString("成品型号", "生产任务单号 = \'" & str & "\'")

If aa IsNot Nothing Then
    e.Form.Controls("a").Value = aa
Elseif bb IsNot Nothing
    e.Form.Controls("a").Value = bb
Else
    MessageBox.Show(" 生产任务单号有错误,请检查!", "提示", MessageBoxButtons.OKCancel, MessageBoxIcon.Question)
End If

 

控件  a 的值并不会自动从表 中提取,,,是那儿出了问题呢?

 

 


--  作者:mr725
--  发布时间:2010/9/24 17:46:00
--  
e.Form.Controls("a").Value =  aa   改为: e.Form.Controls("a").ComboList = aa 

--  作者:卟离卟弃
--  发布时间:2010/9/24 18:03:00
--  

老兄,A控件是 TextBox类型的控件哦...行吗?


--  作者:czy
--  发布时间:2010/9/24 18:10:00
--  
以下是引用卟离卟弃在2010-9-24 18:03:00的发言:

老兄,A控件是 TextBox类型的控件哦...行吗?

 

不行,要组合框控件才行。


--  作者:mr725
--  发布时间:2010/9/24 18:17:00
--  
为何要用TextBox呢?  将属性中多行文本 : true   后,再用 e.Form.Controls("a").Value =  aa  
[此贴子已经被作者于2010-9-24 18:35:14编辑过]

--  作者:mr725
--  发布时间:2010/9/24 18:43:00
--  

这样的效果?  :


图片点击可在新窗口打开查看此主题相关图片如下:dhwb.gif
图片点击可在新窗口打开查看


--  作者:卟离卟弃
--  发布时间:2010/9/24 19:03:00
--  


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

 

我是想再 在生产任务单控件 中输入 内容后, 控件A自动引用定单表中的成品型号,,,控件A然后根据成品型号,自动对BOM清单进行筛选.

 

定单太多了不太好单选,,所以用输入的方式...

[此贴子已经被作者于2010-9-24 19:03:23编辑过]

--  作者:mr725
--  发布时间:2010/9/24 19:15:00
--  
应该不复杂, 做个例子上来吧。  很少有人能凭空写代码的,就像下盲棋一下,那要深厚的功底的···
--  作者:卟离卟弃
--  发布时间:2010/9/24 19:39:00
--  

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:控件自动取值.zip

 

其怪,我刚做的例子又可以,,你看看....


--  作者:mr725
--  发布时间:2010/9/24 20:32:00
--  
foxdb 看不了··· 呵呵