19033.html

来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 27 行

HTML
27
字号
<html>  <head>    <title>Re: 有关 ADODB 的 MOVE 问题,妳好像写错了~~~</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: 有关 ADODB 的 MOVE 问题,妳好像写错了~~~</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by BenneL on September 16, 1999 at 22:14:26:<p>In Reply to: <a href="19031.html">Re: 有关 ADODB 的 MOVE 问题</a> posted by 小琳 on September 16, 1999 at 21:13:53:<p>改成如下即可:<br>: : Private Sub CMD_Click(Index As Integer)<br>: :   Select Case Index<br>: :   Case 0 '最前笔<br>: :     Adodc1.Recordset.MoveFirst<br>: :   Case 1 '前一笔<br>         Adodc1.Recordset.MovePrevious   '往前一笔<br>         if adodc1.recordset.BOF then    '若已是开头则回第一笔<br>             Adodc1.Recordset.Movefirst<br>         end if <br>: :   Case 2 '后一笔<br>         Adodc1.Recordset.Movenext       '往后一笔<br>         if adodc1.recordset.EOF then    '若已是结尾则回最后一笔<br>             Adodc1.Recordset.Movelast<br>         end if <br>: :   Case 3 '最后笔<br>: :     Adodc1.Recordset.MoveLast<br>: :   Case 4 '新增<br>: :     Adodc1.Recordset.AddNew<br>: :   Case 5 '修改<br>: :     Adodc1.Recordset.Update<br>: :   Case 6<br>: :   <br>: :   End Select<p>: : 画面如下 <p>: :       +-----------+<br>: :       |           |   --> 资料库某一栏<br>: :       +-----------+ <p>: :   +----+-------------------------+-----+<br>: :   |<< <|      Adodc1  物件       |> >> |<br>: :   +----+-------------------------+-----+<p>: :   +------+------+------+------+----+----+<br>: :   |最前笔|前一笔|后一笔|最后笔|新增|修改|<br>: :   +------+------+------+------+----+----+<p>: :::小女子试了一下并没有这些问题存在,能否将程式<br>: 传给小女子看看!!!(Luo570@ms31.hinet.net)<p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 19033--><!--top: 19043--><li><a href="19043.html">Re:有关ADODC  MOVE 问题 ~~我解决了!!</a> <b>Tim </b> <i>08:00:31 9/17/99</i>(<!--responses: 19043-->0)<ul><!--insert: 19043--></ul><!--end: 19043--></ul><!--end: 19033--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?