以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  添加多行同时输入字符  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=158425)

--  作者:yangwenghd
--  发布时间:2020/11/19 18:10:00
--  添加多行同时输入字符
老师 可以点击按钮然后把窗口的内容也复制到某列吗?感谢 感谢 
Dim dr As DataRow = DataTables("客户询价表").AddNew(e.Form.Controls("NumericComboBox1").Text )
dr("客户信息_报价编号")=e.form.controls("Label13").text
为什么只添加字符了一行呀,
感谢 感谢 
[此贴子已经被作者于2020/11/19 19:34:49编辑过]

--  作者:有点蓝
--  发布时间:2020/11/19 20:19:00
--  
Dim dr As DataRow
dim s as string = e.form.controls("Label13").text
for i as integer = 1 to (e.Form.Controls("NumericComboBox1").value
dr = DataTables("客户询价表").AddNew
dr("客户信息_报价编号")=s
next