以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 字符串问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=46770) |
-- 作者:tina2012 -- 发布时间:2014/2/27 14:29:00 -- 字符串问题 A表的B行的C列的内容是000000111111,想定义一个数组S()等于000000111111,怎么写代码?写的代码一直弹出错误 |
-- 作者:Bin -- 发布时间:2014/2/27 14:34:00 -- Dim s As Char() = "000000111111".ToCharArray |
-- 作者:tina2012 -- 发布时间:2014/2/27 14:40:00 -- 不想这么直接定义,因为c列有很多行,这样定义可以吗? Dim s As string = dr("C")
|
-- 作者:Bin -- 发布时间:2014/2/27 14:48:00 -- 无法理解你的意思,你前面又说要数组,现在又变字符串? 你是想怎么样呢? |
-- 作者:tina2012 -- 发布时间:2014/2/27 15:43:00 -- 不好意思,是字符串 |
-- 作者:Bin -- 发布时间:2014/2/27 15:44:00 -- 你DR没声明是不会自己出现的哦. dim dr as row = tables("XX").current \'这样是获得当前行
Dim s As String = dr("C") 搞不定你还是上个例子吧 |
-- 作者:狐狸爸爸 -- 发布时间:2014/2/27 15:45:00 -- Dim s() As Char if dr.isnull("C") = false then s = dr("C").ToCharArray end if
[此贴子已经被作者于2014-2-27 15:47:04编辑过]
|
-- 作者:lsy -- 发布时间:2014/2/27 15:59:00 -- 以下是引用狐狸爸爸在2014-2-27 15:45:00的发言:
Dim s() As Char if dr.isnull("C") = false then s = dr("C").ToCharArray end if
[此贴子已经被作者于2014-2-27 15:47:04编辑过] 帮助里没见着,顶上去大家取经。 |
-- 作者:tina2012 -- 发布时间: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) Next
|
-- 作者:Bin -- 发布时间:2014/2/27 16:07: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) Next
|