语句如下
其中字段是我要修改的字段的名字
我的目的是把数据库中最后面几个字符是txt1.text的字符删除
sql = "update ok set 字段1=mid('" & Trim(字段1) & "','" & Trim(b) & "',len(字段1)-'" & Trim(a) & "') where right('" & Trim(字段1) & "','" & Trim(b) & "')='" & Trim(txt1.Text) & "'"

解决方案 »

  1.   

    这样看不出来哦。
    ---------
    www.vicmiao.com
    努力就有美好时光!
      

  2.   

    看楼主的代码,字段1应该是一个确定的字段名,不是变量把
    Dim a As Integer
    a=Len(Trim(Text1.Text))
    sql = "update ok SET 字段1= SUBSTRING(字段1, 1, LEN(字段1)- 1)where 
    right(字段1,"& a &")='" & Trim(txt1.Text) & "'"这样就可以了,这个sql语句就能实现把字段1中最后面几个字符=text1.text删除
      

  3.   

    如果"字段1"也是变量的话
    Dim a As Integer
    Dim 字段1 As String
    字段1="aa"'数据库中的字段名
    a=Len(Trim(Text1.Text))
    sqlstr = "Update t_okSet " & 字段1 & " = SUBSTRING(" & 字段1 & ", 1, len(" & 字段1 & ") - 1) " & _
           "WHERE RIGHT(" & 字段1 & ", " & a & ") = '" & Trim(Text1.Text) & "' "
    呵呵,这下楼主应该明白了吧要结贴哈 *^_^*
      

  4.   

    SUBSTRING是干什么的啊
    我已执行就报错
    说SUBSTRING没有定义
      

  5.   

    还有为什么是 LEN(字段1)- 1
    而不是 LEN(字段1)- 2呢
      

  6.   

    语法
    SUBSTRING ( expression , start , length ) 参数
    expression是字符串、二进制字符串、text、image、列或包含列的表达式。不要使用包含聚合函数的表达式。start是一个整数,指定子串的开始位置。length是一个整数,指定子串的长度(要返回的字符数或字节数)。
      

  7.   

    下例显示如何显示字符串常量 abcdef 中的第二个、第三个和第四个字符。SELECT x = SUBSTRING('abcdef', 2, 3)下面是结果集:x
    ----------
    bcd
      

  8.   

    zhenmeiyisi() 
    vb里面有这个语句么?
    我用了
    报错啊
      

  9.   

    substring -这是sql server 
     你的sqlstr = "... 不是sql语句吗?