- 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=51673)
-- 发布时间：2014/5/31 11:19:00
-- 分开输入列里面
有没办法点击确定后输入对应的列里面啊 谢谢
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:对应输入.table |
此主题相关图片如下：qq截图20140531111722.jpg
-- 发布时间：2014/5/31 12:22:00
--
这样行不行？
Dim tb As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim dr As DataRow = Tables("表A").DataTable.AddNew
dr("第一列") = tb.Lines(0).Trim()
dr("第二列") = tb.Lines(1).Trim()
dr("第三列") = tb.Lines(2).Trim()
-- 发布时间：2014/5/31 12:33:00
--
还是不得行 我先看看帮助
-- 发布时间：2014/5/31 13:37:00
--
With Forms("窗口1").Controls("TextBox1")
For i As Integer = 0 To .Lines.Length - 1
Dim r As Row = Tables("表A").AddNew
r("第一列")= Forms("窗口1").Controls("TextBox1").Lines(i)
Next
End With
-- 发布时间：2014/5/31 14:08:00
--
朱哥 有没什么办法把TextBox1的每一行“：”后面的数据输入到新添加的一列
比如：在TextBox1：
Contact Name: Richard Allingham
Address: Rekemerstraat 1
Rekem/Lanaken, Limburg, Belgium
Zip Code: 3620
Mobile: 0032494618905
No: 62340065382854
点击确定，把Richard Allingham输入第一列
Rekemerstraat 1
Rekem/Lanaken, Limburg, Belgium输入第二列
3620输入第三列
0032494618905输入第四列
62340065382854输入第五列
最后把Address: Rekemerstraat 1
Rekem/Lanaken, Limburg, Belgium 把红色的字符输入第六列（设置为Address：最后字符到最后一个,的字符输入第六列）。
这样能实现吗？朱哥！
-- 发布时间：2014/6/1 16:37:00
--
代码写起来很简单 但是：
你这个设计要保证 “ TextBox1 ” 中的内容的行数固定，每一行的取值规则固定，否则这样的设计没意义，用着就会出错！
-- 发布时间：2014/6/1 17:15:00
--
是固定的 ：有没办法不从TextBox1输入各个列
直接复制到粘贴板 然后点按钮就输入各个列！感谢 感谢