📄 7782.html

📁 VB技巧问答10000例,是一个教程

💻 HTML

字号:

<html>
  <head>
    <title>Re: 关于资料存取修改 (补述)</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 关于资料存取修改 (补述)</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by Musa on November 29, 1998 at 00:08:01:<p>
In Reply to: <a href="7651.html">Re: 关于资料存取修改</a> posted by ChenNet on November 26, 1998 at 10:52:30:<p>
: 使用Mid:<br>: Mid(X,n,m)=Y<br>: 以Y替换X第n个字元起的m个字元<p>您好! <br>我想对 Access97 某一栏 ( 比如说: 图书档/书号 ) 进行筛选. <br>资料格式是文字, 内容约为 " C - 0 0 1 ", 中间有空格 ( C空-空0空0空1 ). <br>我希望进资料库搜寻时是搜寻后三码, 而且可把它们倒出来进行修改 ( 数值处理 ).<br>比如说: " C - 0 0 2 " 改成 " C - 0 0 1 " 再存回去.<br>我该怎么做? SQL 有可用的语法吗? <p><br>这是我做的 '查询' 功能之一部份, 但是我现在想做的是自 TextBox 抓一个书号并到资料库中删除整笔记录(希望书号能自动递减), 请问您说的语法应如何应用 ?<p>sqlstr = "INSERT INTO 查询结果 " ' 暂存档<br>sqlstr = sqlstr + " SELECT 书名, 书别, 书号, 书价, 书等, 购买日期, 是否成套, 其他成员, 书评"<br>sqlstr = sqlstr + " FROM 图书档 "<br>Select Case cboSpe.ListIndex<br>Case -1<br>Case 0<br>Rnkey$ = "C - "<br>Case 1<br>Rnkey$ = "H - "<br>Case 2<br>Rnkey$ = "M - "<br>End Select<br>sqlstr = sqlstr + " WHERE 书号 LIKE '" + Trim$(Rnkey$) + "*'"<br>'执行 SQL 指令<br>DA.Execute sqlstr<br>'撷取查询结果<br>Set TB = DA.OpenRecordset("SELECT * FROM 查询结果", dbOpenDynaset)<br>TB.Requery<p>Musa <p><p><br>--------------------------------------------------------------------------------<p>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 7782-->
</ul><!--end: 7782-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -