Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口中按钮提取字符需求在附件文档中


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

主题:[求助]窗口中按钮提取字符需求在附件文档中

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


加好友 发短信
等级:童狐 帖子:237 积分:1970 威望:0 精华:0 注册:2011/7/1 10:05:00
[求助]窗口中按钮提取字符需求在附件文档中  发帖心情 Post By:2012/12/6 15:15:00 [只看该作者]

窗口中按钮提取字符需求在附件文档中
[此贴子已经被作者于2012-12-6 15:17:08编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
laoshu4569
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:237 积分:1970 威望:0 精华:0 注册:2011/7/1 10:05:00
  发帖心情 Post By:2012/12/6 15:18:00 [只看该作者]

已上传
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目6.rar


 回到顶部
帅哥哟,离线,有人找我吗?
lin_hailun
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2012/12/6 15:18:00 [只看该作者]

 什么问题?具体

 回到顶部
帅哥哟,离线,有人找我吗?
laoshu4569
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:237 积分:1970 威望:0 精华:0 注册:2011/7/1 10:05:00
  发帖心情 Post By:2012/12/6 15:20:00 [只看该作者]

在附件的文档里

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/12/6 15:32:00 [只看该作者]

既然要通过命令窗口或按钮执行,就删除你原来的代码。

 

命令窗口或按钮的代码:

 

For Each dr As DataRow In DataTables("表A").DataRows
    Dim v As String  = dr("wh")
    If v > "" Then
        v = v.SubString(v.Indexof("]") +1)
        v = v.SubString(0,v.LastIndexOf("号"))
        dr("qw") = v
    End If
Next


 回到顶部