19184.html
来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 31 行
HTML
31 行
<html> <head> <title>小v,这个方法我已试过了,不行的....</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>小v,这个方法我已试过了,不行的....</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by 新手 on September 20, 1999 at 17:09:19:<p>In Reply to: <a href="19174.html">Re: 如何比较?</a> posted by 小v on September 20, 1999 at 12:31:08:<p>: : 若Text1.text之资料不在有9笔资料的List1中,就显示MsgBox。<br>: dim i as integer,IsExist as boolean<br>: IsExist=false<br>: for i=0 to List1.ListCount - 1<br>: if List1.List(i)=Text1.text then<br>: IsExist=true<br>: exit for<br>: end if<br>: next<br>: if not IsExist then<br>: msgbox "Not Found!"<br>: end if<p>这样不对,若第一笔的时候就为True会跳出了For,后面的没比较到,在中间也是一样,一定要全部读完后比较才正确。<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 19184--><!--top: 19212--><li><a href="19212.html">Re: 小v,这个方法我已试过了,不行的....</a> <b>小v</b> <i>13:50:41 9/21/99</i>(<!--responses: 19212-->0)<ul><!--insert: 19212--></ul><!--end: 19212--><!--top: 19195--><li><a href="19195.html">Re: 小v,这个方法我已试过了,不行的....</a> <b>andyLin</b> <i>19:10:21 9/20/99</i>(<!--responses: 19195-->0)<ul><!--insert: 19195--></ul><!--end: 19195--></ul><!--end: 19184--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?