Foxtable(狐表)用户栏目专家坐堂 → [求助]写入表格不全


  共有2189人关注过本帖树形打印复制链接

主题:[求助]写入表格不全

帅哥哟,离线,有人找我吗?
天一生水
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1141 积分:11272 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]写入表格不全  发帖心情 Post By:2018/10/26 22:59:00 [显示全部帖子]

将文本框内容中的每一行,顿号“、”前的写入[首行],顿号“、”后的写入[末行]。
为什么没写全?
见图中的写入结果、文本框的文本、文本框中的字符编码。
代码如下:
Dim str As String = e.Form.Controls("TextBox4").text
For Each s As String In str.split(vbcrlf)
msgbox(s)
    Dim nr As Row = Tables("席签打印_table1").addnew
    nr("首行") = s.Split("、")(0)
    nr("未行") = s.Split("、")(1)
Next


图片点击可在新窗口打开查看此主题相关图片如下:image 2.jpg
图片点击可在新窗口打开查看


 回到顶部