字符串问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 字符串问题

共有3738人关注过本帖树形打印复制链接主题：字符串问题

tina2012

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

字符串问题

Post By：2014/2/27 14:29:00 [显示全部帖子]

A表的B行的C列的内容是000000111111，想定义一个数组S（）等于000000111111，怎么写代码？写的代码一直弹出错误

tina2012

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

Post By：2014/2/27 14:40:00 [显示全部帖子]

不想这么直接定义，因为c列有很多行，这样定义可以吗？

Dim s As string = dr("C")

tina2012

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

Post By：2014/2/27 15:43:00 [显示全部帖子]

不好意思，是字符串

Dim s As String = dr("C") 运行之后有错误
图片点击可在新窗口打开查看

此主题相关图片如下：00.bmp

tina2012

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

Post By：2014/2/27 16:06:00 [显示全部帖子]

找出Team_Users表中找出Name列的内容是_UserName的这一行，再把这一行的PermissionValue列的内容（例如11110000）分别写到System_Permission表的Permission列中。以下代码弹出错误，请帮忙。谢谢

Dim dr As DataRow

dr = DataTables("Team_Users").Find("Name = '& _UserName &'")

Dim s As String = dr("PermissionValue").ToCharArray

For i As Integer=0 To s.length-1

Tables("System_Permission").rows(i)("Permission") = s(i)

tina2012

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

Post By：2014/2/27 16:16:00 [显示全部帖子]

怎么你又复制了一遍，如下代码运行后事有错误的，求帮忙
dvubb

此主题相关图片如下：00.bmp

Dim dr As DataRow

dr = DataTables("Team_Users").Find("Name = '& _UserName &'")

Dim s As String = dr("PermissionValue")

For i As Integer=0 To s.length-1

Tables("System_Permission").rows(i)("Permission") = s(i)

tina2012

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：286 积分：2462 威望：0 精华：0 注册：2013/9/23 16:09:00

Post By：2014/2/27 16:20:00 [显示全部帖子]

怎么是复制了一遍代码，以下代码运行后是有错误的，求帮忙

Dim dr As DataRow

dr = DataTables("Team_Users").Find("Name = '& _UserName &'")

Dim s As String = dr("PermissionValue")

For i As Integer=0 To s.length-1

Tables("System_Permission").rows(i)("Permission") = s(i)

此主题相关图片如下：00.bmp

下一主题 >> << 上一主题

主题：字符串问题