以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  复制控件数据到整列  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=127303)

--  作者:yangwenghd
--  发布时间:2018/11/10 15:50:00
--  复制控件数据到整列
能帮忙看看这个吗?就是点击按钮,然后 NumericComboBox2 的内容复制到Table1的 方式一_预算信息_重量 列,感谢 感谢 
If e.Form.Controls("NumericComboBox2").Text > "" Then
    Dim t As Table = e.Form.Controls("Table1").Table
    For i As Integer = t.BottomPosition To t.TopPosition Step -1
        t.Rows(i)("方式一_预算信息_重量") = e.Sender.text
    Next
End If 

--  作者:有点蓝
--  发布时间:2018/11/10 16:02:00
--  
If e.Form.Controls("NumericComboBox2").value <> nothing Then
--  作者:yangwenghd
--  发布时间:2018/11/10 16:11:00
--  
.NET Framework 版本:2.0.50727.8936
Foxtable 版本:2018.10.9.1
错误所在事件:窗口,运费预算窗口,Button4,Click
详细错误信息:
从字符串“查询”到类型“Double”的转换无效。
输入字符串的格式不正确。
这个是列的类型不对吗?感谢 感谢 

--  作者:有点蓝
--  发布时间:2018/11/10 16:33:00
--  
If e.Form.Controls("NumericComboBox2").value <> nothing Then
    Dim t As Table = e.Form.Controls("Table1").Table
    For i As Integer = t.BottomPosition To t.TopPosition Step -1
        t.Rows(i)("方式一_预算信息_重量") = e.Form.Controls("NumericComboBox2").value
    Next
End If 

--  作者:yangwenghd
--  发布时间:2018/11/10 16:40:00
--  
感谢 感谢 ,老师 可以直接是复制到整列吗?不用是选中的行或者列,就是点击后复制到这列,感谢 感谢 

还有给问题想请教老师,就是我在这列设置为表达式列,每次复制到列的时候都复制不完,这是为什么啊 感谢 感谢
[此贴子已经被作者于2018/11/10 16:55:36编辑过]

--  作者:有点甜
--  发布时间:2018/11/11 9:55:00
--  

请回头,认认真真学基础。

 

http://www.foxtable.com/webhelp/scr/1438.htm