20120.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 23 行

HTML
23
字号
<html>  <head>    <title>Re: listbox选项填入资料库的问题~~~~~求救!!</title>  </head>  <body bgcolor="#FFFFFF" vlink="#808080">    <center>      <h1>Re: listbox选项填入资料库的问题~~~~~求救!!</h1>    </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by 小v on October 14, 1999 at 09:43:07:<p>In Reply to: <a href="20086.html">listbox选项填入资料库的问题~~~~~求救!!</a> posted by 阿帝拉 on October 13, 1999 at 15:29:52:<p>:  Data1.Recordset.AddNew<br>:  Dim I As Integer<br>:   For I = 0 To List1.ListCount - 1<br>:   Next I<br>:  Data1.Recordset(I) = txtSource.Text<br>:  Data1.Recordset.Update<p>: 请问一下上面的程式码哪里有误要修正的...<br>: 我现在是要把选到的项目加到listbox中...<br>: 而且全部加到资料库中....<br>:             新手求救...........  :~~~<p>以下程式码是将LIST1所有的项目加到Table中的AAA栏位:<br>For i = 0 To List1.ListCount - 1<br>   Data1.Recordset.AddNew<br>   Data1.Recordset("AAA") = List1.List(i)<br>   Data1.Recordset.Update<br>Next i<p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20120--></ul><!--end: 20120--><br><hr size=7 width=75%><p></body></html>

⌨️ 快捷键说明

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