以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]控件赋值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=161188) |
-- 作者:江南小镇 -- 发布时间:2021/3/9 14:16:00 -- [求助]控件赋值 老师,下面控件不赋值。 Dim cmb As WinForm.ComboBox = e.Form.Controls("ComboBox1") Dim str = cmb.SelectedValue msgbox(str) Dim dr As DataRow = DataTables("设置").Find("名称 = \'" & str & "\'") If dr IsNot Nothing Then e.Form.Controls("TextBox7").Value= dr("商品编码") e.Form.Controls("TextBox7").WriteValue End If |
-- 作者:有点蓝 -- 发布时间:2021/3/9 14:43:00 -- 给绑定的表格赋值:http://www.foxtable.com/webhelp/topics/2436.htm |