以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]在按钮中为特定条件的列赋值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=13565)
--  作者：dqlgood
--  发布时间：2011/10/17 17:01:00
--  [求助]在按钮中为特定条件的列赋值
我想在按扭中为第一列等于Label1（已关联取值）的第二列赋值为combobox1中所选定的值，如何编码？
--  作者：狐狸爸爸
--  发布时间：2011/10/17 17:12:00
--  

没看懂你的意思。

最好用例子说话，便于他人理解，也能更快的获得回复。
--  作者：dqlgood
--  发布时间：2011/10/17 22:14:00
--  

问题见附件窗口。

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目3.table
--  作者：czy
--  发布时间：2011/10/17 22:19:00
--  
我笨，还是没看懂。
--  作者：mr725
--  发布时间：2011/10/17 22:42:00
--  
Dim drs As List(Of DataRow)
drs = DataTables("表A").Select("[检验项目] = \'" & Forms("窗口1").Controls("Label1").text & "\'")
For Each dr As DataRow In drs
    dr("化验员") = Forms("窗口1").Controls("ComboBox1").text
Next
--  作者：dqlgood
--  发布时间：2011/10/18 6:06:00
--  

测试，通过。谢谢！