📄 3148.html

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

💻 HTML

字号:

<html>
  <head>
    <title>Re: 关于注标的使用问题？</title>
  </head>
  <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="red" VLINK="#808080" ALINK="">
    <center>
      <h1>Re: 关于注标的使用问题？</h1>
    </center>

<HR><p>
Posted by <a href="mailto:yfwu@iname.com">小吴</a> on June 08, 1998 at 03:06:05:<p>
In Reply to: <a href="3118.html"><b>关于注标的使用问题？</b></a> posted by yuyi on June 05, 1998 at 07:18:01:<p>
因为你是使用 MultiSelect，所以你必须从尾至头检查 Selected 属性，例如:<br>For i = List1.ListIndex - 1 To 0 Step -1<br>　If List1.Selected(i) Then<br>　　List2.AddItem List1.ListItem(i)<br>　　List1.Remove i<br>　End If<br>Next i<p>不过这样加到 List2 的顺序会反过来，因此建议你把 List1 和 List2 的 Sorted 属性都设为 true
<br>
<p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 3148-->
</ul><!--end: 3148-->
<br><HR><p>

</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -