主题：字符串的问题

呵呵 这是个难题，睡了～

看不懂哦～  怎么写到某列中去呢？？

八婺兄的好懂～

迷上字符串了，也来一个另类思路的：（借助八婺老师的例子）～ 繁琐了些，但也可达到目的。

for h as integer = 0 to currenttable.count-1
    currenttable(h,"第三列") = nothing
    dim sz as string = "0123456789"
    Dim dr As string = currenttable(h,"第一列")
    for i as integer = 0 to dr.length-1
        for i1 as integer = 0 to 9
            if dr(i) = sz(i1) then
                dr = dr.Replace("" & dr(i) & "","§")
                output.show(dr)
                currenttable(h,"第三列") = dr.trim("","§")
           End If
        next
    next
next

For  r As integer = 0 to Currenttable.count -1
    Currenttable(r,"第三列")  = Currenttable(r,"第三列").replace("§","")
Next