Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共19 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:[求助]分列代码怎么写?split

11楼
don 发表于:2008/12/6 1:30:00


if e.datacol.name="B" then
     Dim Cns As String() = {"C","D","E","F","G","H","I","J","K","L"}
     Dim dr As DataRow = e.datarow
     dim i as integer

     For i = 0 to 9
          dr(Cns(i)) = Nothing
     Next    
  
     if dr("B") IsNot Nothing then
            For i = 0 to dr("B").split("-").Length-1
                  dr(Cns(i)) = dr("B").split("-")(i)
            Next    
     End if
End if

[此贴子已经被作者于2008-12-6 1:32:29编辑过]
12楼
kylin 发表于:2008/12/6 8:52:00
以下是引用don在2008-12-6 1:30:00的发言:


if e.datacol.name="B" then
     Dim Cns As String() = {"C","D","E","F","G","H","I","J","K","L"}
     Dim dr As DataRow = e.datarow
     dim i as integer

     For i = 0 to 9
          dr(Cns(i)) = Nothing
     Next    
  
     if dr("B") IsNot Nothing then
            For i = 0 to dr("B").split("-").Length-1
                  dr(Cns(i)) = dr("B").split("-")(i)
            Next    
     End if
End if

[此贴子已经被作者于2008-12-6 1:32:29编辑过]

初步看应该没有问题,可以使用

13楼
小狐 发表于:2008/12/6 12:06:00
以下是引用mr725在2008-12-6 0:38:00的发言:

这个不对呀~


图片点击可在新窗口打开查看此主题相关图片如下:未命名2.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2008-12-6 0:38:18编辑过]

大哥,你是不是要求没有达到10列的,要有一个提示吗

14楼
小狐 发表于:2008/12/6 12:15:00
不知道 如何用数字直接代替列名
15楼
mr725 发表于:2008/12/6 13:29:00
以下是引用小狐在2008-12-6 12:06:00的发言:

大哥,你是不是要求没有达到10列的,要有一个提示吗

谢谢小狐,不是要个提示,是有“-”符号的都要分列填入的c、d、.....l 列里,如果修改、减少、或退掉多入的内容,c、d、.....l 列里也要相应的变化。
11楼don老师的代码ok啦~ (不知道要学多久才会写这样的代码,本人笨呀~ )
也要谢11楼don老师,和12楼kylin老师的回复。

还想问一下老师们:能用表达式吗?  比如c列,怎么写?

[此贴子已经被作者于2008-12-6 13:34:04编辑过]
16楼
don 发表于:2008/12/6 13:56:00
以下是引用mr725在2008-12-6 13:29:00的发言:


还想问一下老师们:能用表达式吗?  比如c列,怎么写?

 

如B列数据规律性较强或可以,无规律则不能.

17楼
mr725 发表于:2008/12/6 14:04:00
以下是引用don在2008-12-6 13:56:00的发言:

如B列数据规律性较强或可以,无规律则不能.

您指的规律是什么? 是每段的字符个数吗? 这个字符个数是不定的呀!如:
AAA...-BB...-CCCC...-..........  A、B、C...等字符数都不确定的。 真的没法用表达式是吗?

18楼
don 发表于:2008/12/6 14:35:00
无法
19楼
mr725 发表于:2008/12/6 14:40:00
以下是引用don在2008-12-6 14:35:00的发言:
无法

只好用替代的办法了,见http://www.foxtable.com/dispbbs.asp?boardid=2&Id=1332 里面有另外的问题。

共19 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02344 s, 2 queries.