Foxtable(狐表)用户栏目专家坐堂 → 在指定列指定字符后面插入符号


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

主题:在指定列指定字符后面插入符号

帅哥哟,离线,有人找我吗?
FoxMan
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:302 积分:1860 威望:0 精华:0 注册:2012/4/27 11:34:00
  发帖心情 Post By:2012/4/30 8:35:00 [显示全部帖子]

Dim Ls1 As String() ={"3","6","9"}
Dim Ls2 As String() ={"-","/","#"}
For each dr as Datarow in DataTables("A").Select("B >''")
     For n1 as integer =0  to Ls1.Length-1
         dr("B")=dr("B").Replace(Ls1(n1),ls1(n1) & Ls2(n1))
         n1+=1
     Next
Next


 回到顶部