用VB语句删除字符

我想删除年月日前面的'号,如把'1998.1.1改写成1998.1.1,删除’,该怎样写VB语句,因为一张表上需删除的太多,而且需经常重复操作,请大侠帮忙!补充一下,我要... 我想删除年月日前面的'号,如把'1998.1.1改写成1998.1.1,删除’,该怎样写VB语句,因为一张表上需删除的太多,而且需经常重复操作,请大侠帮忙!
补充一下,我要删除的是一张EXCEL表上的一列日期前面的"'",因为这张EXCEL表是从一个办公软件中导出的,需要经常的重复操作,现在求哪位大侠写个宏,我直接运行一下,可为我带来极大地方便!
展开
 我来答
HB_0916
2009-07-15 · TA获得超过143个赞
知道小有建树答主
回答量:175
采纳率:0%
帮助的人:0
展开全部
Private Sub Command1_Click()
MsgBox Mid("'1998.1.1", 2)
End Sub

vb是可以改,但是我建议用SQL语句直接改数据库
update 表 set 列=right(列,len(列)-1)

Mid 函数
返回 Variant (String),其中包含字符串中指定数量的字符。
语法
Mid(string, start[, length])
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串 ("")。
length 可选参数;为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到尾端的所有字符。

有可能是你的start变量值大于字符串长度,导致返回空字符串,或者是变量值为0,导致错误
barocco
2009-07-16
知道答主
回答量:63
采纳率:0%
帮助的人:22.5万
展开全部
删除某一个单元格中字符串开头的“‘”号:
...
Right(xlsheet.cells(i,j),len(xlsheet.cells(i,j))-1)

注:以上省略了创建对象、打开工作簿等的代码...
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友2032eaa
2009-07-15 · TA获得超过809个赞
知道大有可为答主
回答量:2149
采纳率:100%
帮助的人:1817万
展开全部
在vb里可以用replace函数 也可以用mid
也可以直接用sql更新 用 replace或substring都可以
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
企鵝皮皮dW
2009-07-15 · TA获得超过406个赞
知道小有建树答主
回答量:205
采纳率:0%
帮助的人:0
展开全部
用For和mid.
mid "'1998.1.1",2
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式