Question

用VB语句删除字符

我想删除年月日前面的'号，如把'1998.1.1改写成1998.1.1，删除’，该怎样写VB语句，因为一张表上需删除的太多，而且需经常重复操作，请大侠帮忙！
补充一下，我要删除的是一张EXCEL表上的一列日期前面的"'",因为这张EXCEL表是从一个办公软件中导出的，需要经常的重复操作，现在求哪位大侠写个宏，我直接运行一下，可为我带来极大地方便！

Answer 1

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,导致错误

Answer 2

删除某一个单元格中字符串开头的“‘”号：
...
Right(xlsheet.cells(i,j),len(xlsheet.cells(i,j)）-1)

注：以上省略了创建对象、打开工作簿等的代码...

Answer 3

在vb里可以用replace函数 也可以用mid
也可以直接用sql更新 用 replace或substring都可以

Answer 4

用For和mid.
mid "'1998.1.1",2