Foxtable(狐表) → 用户栏目 → 专家坐堂 → 集合问题


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

主题：集合问题
帅哥哟，离线，有人找我吗？
sdscen
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：253 积分：2341 威望：0 精华：0 注册：2011/8/8 0:50:00 		集合问题  发帖心情 Post By：2019/10/24 17:39:00 [显示全部帖子]

Dim drs As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim Pds As List(Of String)
For Each Pro As DataRow In DataTables("产品信息表").DataRows
    Dim dd As String = pro("产品编号2")
    pds.Add(dd)
Next
drs.Text = pds(0)
以上我想从产品信息表里提出产品编号2添加到集合PDS里面，再显示第一个位置的值再文本框DRS中显示，出现错误，找不出原因，请教老师
 回到顶部
帅哥哟，离线，有人找我吗？
sdscen
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：253 积分：2341 威望：0 精华：0 注册：2011/8/8 0:50:00 		  发帖心情 Post By：2019/10/24 19:12:00 [显示全部帖子]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟，离线，有人找我吗？
sdscen
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：253 积分：2341 威望：0 精华：0 注册：2011/8/8 0:50:00 		  发帖心情 Post By：2019/10/24 19:12:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20191024191048.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
sdscen
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：253 积分：2341 威望：0 精华：0 注册：2011/8/8 0:50:00 		  发帖心情 Post By：2019/10/24 19:13:00 [显示全部帖子]

请问我的代码有错吗

 回到顶部
帅哥哟，离线，有人找我吗？
sdscen
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：253 积分：2341 威望：0 精华：0 注册：2011/8/8 0:50:00 		  发帖心情 Post By：2019/10/24 19:43:00 [显示全部帖子]

Dim drs As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim Pds As new List(Of String)
For Each Pro As DataRow In DataTables("产品信息表").DataRows
    Dim dd As String = pro("产品编号2")
    pds.Add(dd.SubString(4,4))
Next
drs.Text = pds(0)
多谢，前面没问题了，是我大意了，
再进一步，我要取产品编号2的第4个字符后面的4个字符，第五行代码又出错了

图片点击可在新窗口打开查看此主题相关图片如下：微信截图_20191024193948.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
sdscen
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：童狐 帖子：253 积分：2341 威望：0 精华：0 注册：2011/8/8 0:50:00 		  发帖心情 Post By：2019/10/24 20:13:00 [显示全部帖子]

不行
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 5 次数据查询